Displaying 1 result from an estimated 1 matches for "siteone".
Did you mean:
miteone
2007 Jun 18
1
Second y-axis in xyplot (lattice) where y1 and y2 have different ranges
...dat2 below,
lattice will be preferable to complex layouts. Thanks, Andy
dat <- data.frame(Year = 1751:2000,
Stuff = rnorm(250),
Samples = floor(seq(5,30,length.out=250)
+rnorm(250,5)),
Grp = rep('SiteOne',250))
par(mar=c(5,4,4,4) + 0.1)
plot(Stuff~Year, data=dat, type='l')
par(new=T)
plot(Samples~Year, data=dat, type="l", axes=F, bty="n",
xlab="", ylab="")
axis(4, at=pretty(range(dat$Samples)))
mtext("Number of Samples"...