Displaying 3 results from an estimated 3 matches for "par_avg".
2010 Nov 10
1
Extending a plot in a loop
...eader
= TRUE,sep = ",", quote = " ", dec = ".")
> attach(radiation.data)
The following object(s) are masked from 'radiation.data (position 3)':
Batt_avg, Batt_st, Day, Hour, Kdown_avg, Kdown_st, LW_in, LW_in_st,
Minute, Month, PanelT_avg, PanelT_st, PAR_avg, PAR_st, Sec,
Tcase_avg, Tcase_st, Tdome_avg, Tdome_st, Thermopile_avg,
Thermopile_st, Tuv_avg, Tuv_st, Uva_avg, Uva_st, Uvb_avg, Uvb_st,
Year
> names(radiation.data)
[1] "Year" "Month" "Day" "Hour"
[5] "Min...
2010 Nov 16
1
Extending a plot in a loop (With attachment)
...eader
= TRUE,sep = ",", quote = " ", dec = ".")
> attach(radiation.data)
The following object(s) are masked from 'radiation.data (position 3)':
Batt_avg, Batt_st, Day, Hour, Kdown_avg, Kdown_st, LW_in, LW_in_st,
Minute, Month, PanelT_avg, PanelT_st, PAR_avg, PAR_st, Sec,
Tcase_avg, Tcase_st, Tdome_avg, Tdome_st, Thermopile_avg,
Thermopile_st, Tuv_avg, Tuv_st, Uva_avg, Uva_st, Uvb_avg, Uvb_st,
Year
> names(radiation.data)
[1] "Year" "Month" "Day" "Hour"
[5] "Min...
2010 Nov 04
1
Plotting a vector data
....
x<- matrix( list.files("C:/updated_CFL_Rad_files/2007/11",full=TRUE))
for(i in 1:30) {
radiation.data <-read.table(x[i], header = TRUE,sep = ",", quote = " ",
dec = ".")
attach(radiation.data)
names(radiation.data)
mean.radiation[i]<- mean(PAR_avg,na.rm = TRUE)
}
How can I plot this vector (mean.radiation[i]) vs i ?
I tried to do so but there was an error:
Error in plot.window(...) : need finite 'ylim' values
In addition: Warning messages:
1: In min(x) : no non-missing arguments to min; returning Inf
2: In max(x) : no non-mi...