agricolae (version 1.0-8)

design.dau: Augmented block design

Description

In these designs, some treatments (checks) are replicate r times and other treatments (new) are replicated once.

Usage

design.dau(trt1, trt2, r, number = 1, seed = 0, kinds = "Super-Duper", name="trt")

Arguments

trt1

checks

trt2

new

r

Replications or blocks

number

number of first plot

seed

seed

kinds

method for to randomize

name

name of treatments

Value

• trt1
  vector, name of the treatments
• trt2
  vector, name of the treatments
• r
  Numeric
• number
  Numeric
• seed
  Numeric

Details

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

References

1. Augmented (or Hoonuiaku) Design. Federer, W.T. (1956), Hawaii Plr. rec., 55: 191-208. 2. In Augmented Designs. Federer, W.T and Raghavarao, D. (1975). Bometrics, vol. 31, No. 1 (mar.., 1975), pp. 29-35

See Also

design.rcbd

Examples

library(agricolae)
# 4 treatments and 5 blocks
T1<-c("A","B","C","D")
T2<-letters[20:26]
dau <-design.dau(T1,T2, r=5)
# field book
dau
by(dau,dau[2],function(x) paste(x[,1],"-",as.character(x[,3])))
# write in hard disk
# write.table(dau,"dau.txt", row.names=FALSE, sep="\t")
# file.show("dau.txt")
# Augmented designs in Completely Randomized Design
trt<-c(T1,T2)
r<-c(4,4,4,4,1,1,1,1,1,1,1)
book <- design.crd(trt,r)