if (FALSE) {
library(agridat)
data(dasilva.soybean.uniformity)
dat <- dasilva.soybean.uniformity
libs(desplot)
desplot(dat, yield ~ col*row,
flip=TRUE, aspect=28.8/14.4,
main="dasilva.soybean.uniformity")
}
Run the code above in your browser using DataLab