# NOT RUN {
data(holland.arthropods)
dat <- holland.arthropods
require(lattice)
contourplot(linyphiidae ~ col*row, dat, at=c(0,40,80,120,160,200), region=TRUE,
col.regions=c('gray90','gray70','gray50','gray30','gray10'),
main="holland.arthropods - linyphiidae counts in winter wheat")
# }
# NOT RUN {
contourplot(n.brevicollis ~ col*row, dat, region=TRUE)
contourplot(linyphiidae~ col*row, dat, region=TRUE)
contourplot(collembola ~ col*row, dat, region=TRUE)
contourplot(carabidae ~ col*row, dat, region=TRUE)
contourplot(lycosidae ~ col*row, dat, region=TRUE)
contourplot(weedcover ~ col*row, dat, region=TRUE)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab