| design.graeco {agricolae} | R Documentation |
A graeco - latin square is a KxK pattern that permits the study of k treatments simultaneously with three different blocking variables, each at k levels.
The function is only for squares of the odd numbers and even numbers (4, 8, 10 and 12)
design.graeco(trt1, trt2, number = 1, seed = 0, kinds = "Super-Duper")
trt1 |
Treatments |
trt2 |
Treatments |
number |
number of first plot |
seed |
seed |
kinds |
method for to randomize |
kinds <- c("Wichmann-Hill", "Marsaglia-Multicarry", "Super-Duper", "Mersenne-Twister", "Knuth-TAOCP", "user-supplied", "Knuth-TAOCP-2002", "default" )
trt1 |
vector, name of the treatments |
trt2 |
vector, name of the treatments |
number |
Numeric |
seed |
Numeric |
Felipe de Mendiburu
1. Statistics for Experimenters Design, Innovation, and Discovery Second Edition. George E. P. Box. Wiley-Interscience. 2005.
2. Experimental design. Cochran and Cox. Second edition. Wiley Classics Library Edition published 1992.
design.crd, design.lsd, random.ab,
fact.nk
library(agricolae)
T1<-c("a","b","c","d")
T2<-c("v","w","x","y")
graeco <- design.graeco(T1,T2,number=101)
plots <-as.numeric(graeco[,1])
trt <- paste(graeco[,4],graeco[,5])
dim(plots)<-c(4,4)
dim(trt) <-c(4,4)
print(t(plots))
print(t(trt))
# 10 x 10
T1 <- letters[1:10]
T2 <- 1:10
graeco <- design.graeco(T1,T2)
trt <- paste(graeco[,4],graeco[,5])
dim(trt) <-c(10,10)
print(t(trt))