library(agricolaeplotr)
library(agricolae)
T1<-c('a','b','c','d','e')
T2<-c('v','w','x','y','z','zz')
r = 3
outdesign2 <- design.split(trt1=T1, trt2=T2, r=r,serie = 2,
seed = 0, kinds = 'Super-Duper',randomization=TRUE,
first=TRUE,design = 'rcbd')
plot_split_rcbd(outdesign2,width = 1,height = 1)
plot_split_rcbd(outdesign2,width = 1,height = 1,reverse_y = TRUE)
plot_split_rcbd(outdesign2,width = 1,height = 1,reverse_x = TRUE,reverse_y = TRUE)
Run the code above in your browser using DataLab