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")
```

Embedding an R snippet on your website

Add the following code to your website.

For more information on customizing the embed code, read Embedding Snippets.