design.crd {agricolae} | R Documentation

## Completely Randomized Design

### Description

It generates completely a randomized design with equal or different repetition. "Random" uses the methods of number generation in R. The seed is by set.seed(seed, kinds).

### Usage

    design.crd(trt, r, serie = 2, seed = 0, kinds = "Super-Duper",randomization=TRUE)

### Arguments

`trt` | Treatments
`r` | Replications
`serie` | number plot, 1: 11,12; 2: 101,102; 3: 1001,1002
`seed` | seed
`kinds` | method for to randomize
`randomization` | TRUE or FALSE - randomize

### Details

kinds <- c("Wichmann-Hill", "Marsaglia-Multicarry", "Super-Duper", "Mersenne-Twister", "Knuth-TAOCP", "user-supplied", "Knuth-TAOCP-2002", "default" )

### Value

`parameters` | Design parameters
`book` | Fieldbook

### Author(s)

Felipe de Mendiburu

### References

Introduction to Experimental Statistics. Ching Chun Li. McGraw-Hill Book Company, INC, New. York, 1964

### See Also

`design.ab`, `design.alpha`,`design.bib`, `design.split` , `design.cyclic` , `design.dau` , `design.graeco`, `design.lattice`, `design.lsd`, `design.rcbd`, `design.strip`

### Examples

    library(agricolae)
    trt <-c("CIP-101","CIP-201","CIP-301","CIP-401","CIP-501")
    r <-c(4,3,5,4,3)
    # seed = 12543
    outdesign1 <-design.crd(trt,r,serie=2,2543,"Mersenne-Twister")
    book1<-outdesign1
    # no seed
    outdesign2 <-design.crd(trt,r,serie=3)
    print(outdesign2$parameters)
    book2<-outdesign2
    # write to hard disk
    # write.table(book1,"crd.txt", row.names=FALSE, sep="\t")
    # file.show("crd.txt")

[Package agricolae version 1.2-9 Index]