dat <- ars.earlywhitecorn96
require("lattice")
dotplot(gen~yield, dat, group=loc, auto.key=list(columns=3))
dotplot(gen~stalklodge, dat, group=loc, auto.key=list(columns=3))
splom(~dat[,3:9], group=dat$loc, auto.key=list(columns=3))Run the code above in your browser using DataLab