# NOT RUN {
library(agridat)
data(strickland.apple.uniformity)
dat <- strickland.apple.uniformity
libs(desplot)
desplot(dat, yield ~ col*row,
main="strickland.apple.uniformity",
flip=TRUE, aspect=(18/11))
# }
Run the code above in your browser using DataLab