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.