Displaying 1 result from an estimated 1 matches for "spray3".
Did you mean:
spray
2005 Apr 10
2
Plotting the occassional second label
...text a little higher:
> spray1 <- spray[spray$PD=="Spidermites", ]
> spray2 <- spray1[spray1$SprayDate==unique(spray1$SprayDate), ]
Warning message:
longer object length
is not a multiple of shorter object length in: spray1$SprayDate == unique(spray1$SprayDate)
> spray3 <- spray1[spray1$SprayDate!=unique(spray1$SprayDate), ]
Warning message:
longer object length
is not a multiple of shorter object length in: spray1$SprayDate != unique(spray1$SprayDate)
> plot(as.Date(spray2$SprayDate), spray2$Qwater,
+ xlim = c(as.Date("2005-03-08"),...