# NOT RUN {
data(buntaran.wheat)
library(agridat)
dat <- buntaran.wheat
library(lattice)
bwplot(yield~loc|zone, dat, layout=c(1,3),
scales=list(x=list(rot=90)),
main="buntaran.wheat")
# }
Run the code above in your browser using DataLab