# NOT RUN {
library(agridat)
# Corn 1
data(nonnecke.sweetcorn.uniformity)
dat <- nonnecke.sweetcorn.uniformity
libs(desplot)
desplot(dat, yield~col*row|loc,
flip=TRUE, tick=TRUE, aspect=96/180, # true aspect
main="nonnecke.sweetcorn.uniformity")
# }
Run the code above in your browser using DataLab