| design.rcbd | R Documentation | 
It generates Randomized Complete Block Design. "Random" uses the methods of number generation in R. The seed is by set.seed(seed, kinds).
design.rcbd(trt, r, serie = 2, seed = 0, kinds = "Super-Duper", first=TRUE,
continue=FALSE,randomization=TRUE )
| trt | Treatments | 
| r | Replications or blocks | 
| serie | number plot, 1: 11,12; 2: 101,102; 3: 1001,1002 | 
| seed | seed | 
| kinds | method for to randomize | 
| first | TRUE or FALSE - randomize rep 1 | 
| continue | TRUE or FALSE, continuous numbering of plot | 
| randomization | TRUE or FALSE - randomize | 
kinds <- c("Wichmann-Hill", "Marsaglia-Multicarry", "Super-Duper", "Mersenne-Twister", "Knuth-TAOCP", "user-supplied", "Knuth-TAOCP-2002", "default" )
| parameters | Design parameters | 
| sketch | Design sketch | 
| book | Fieldbook | 
Felipe de Mendiburu
Introduction to Experimental Statistics. Ching Chun Li. McGraw-Hill Book Company, INC, New. York, 1964
design.ab, design.alpha,design.bib, 
design.crd , design.cyclic , design.dau ,
design.graeco, design.lattice, design.lsd,
design.split, design.strip 
library(agricolae)
# 5 treatments and 6 blocks
trt<-c("A","B","C","D","E")
outdesign <-design.rcbd(trt,6,serie=2,986,"Wichmann-Hill") # seed = 986
book <-outdesign$book # field book
# write in hard disk
# write.table(book,"rcbd.txt", row.names=FALSE, sep="\t")
# file.show("rcbd.txt")
# Plots in field model ZIGZAG
fieldbook <- zigzag(outdesign)
print(outdesign$sketch)
print(matrix(fieldbook[,1],byrow=TRUE,ncol=5))
# continuous numbering of plot
outdesign <-design.rcbd(trt,6,serie=0,continue=TRUE)
head(outdesign$book)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.