require(agridat)require(desplot) desplot(block ~ col+row, yates.oats, col=nitro, teVt=gen, ceV=1,main="裂区试验设想种植图", out1=block, out2=gen)