design.lsd | R Documentation |
It generates Latin Square Design. "Random" uses the methods of number generation in R. The seed is by set.seed(seed, kinds).
design.lsd(trt, serie = 2, seed = 0, kinds = "Super-Duper",first=TRUE,randomization=TRUE)
trt |
Treatments |
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 |
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 |
book |
Fieldbook |
Felipe de Mendiburu
Introduction to Experimental Statistics. Ching Chun Li. McGraw-Hill Book Company, INC, New. York, 1969
design.ab
, design.alpha
,design.bib
,
design.crd
, design.cyclic
, design.dau
,
design.graeco
, design.lattice
, design.split
,
design.rcbd
, design.strip
library(agricolae)
varieties<-c("perricholi","yungay","maria bonita","tomasa")
outdesign <-design.lsd(varieties,serie=2,seed=23)
lsd <- outdesign$book
print(outdesign$sketch)
print(lsd) # field book.
plots <-as.numeric(lsd[,1])
print(matrix(plots,byrow = TRUE, ncol = 4))
# Write on hard disk.
# write.table(lsd,"lsd.txt", row.names=FALSE, sep="\t")
# file.show("lsd.txt")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.