Displaying 1 result from an estimated 1 matches for "leafdig".
Did you mean:
leading
2003 Sep 02
1
Plotting dates
...on dates and getting julian
dates along the x-axis:
library(date)
Week<-as.date(c("05/02/03","05/09/03","05/16/03","05/23/03","05/30/03","06/0
7/03","06/14/03"))
Leafminers<-c(0,2,5,10,4,6,5)
Diglyphus<-c(0,0,4,5,7,3,1)
LeafDig<-cbind(Week,Leafminers,Diglyphus)
plot(LeafDig,ylim=c(0,20),main="Leafminers",ylab="Observed
numbers",xlab="",adj=0,bty="l")
points(Diglyphus,pch=2)
lines(Diglyphus,lty=2)
legend(1,18,c("Leafminers","Diglyphus"),lty=c(1,2),pch=c(1,2))...