# NOT RUN {
library(agridat)
data(kalamkar.potato.uniformity)
dat <- kalamkar.potato.uniformity
# Similar to figure 1 of Kalamkar
libs(desplot)
desplot(dat, yield~col*row,
flip=TRUE, tick=TRUE, aspect=288/132, # true aspect
main="kalamkar.potato.uniformity")
# }
Run the code above in your browser using DataLab