Ejemplo Taguchi
## use proper labelled factors
## should of course be as meaningful as possible for your data
library (DoE.base)
fnc <- c(list(c("current","new")),rep(list(c("type1", "type2","type3")),3))
names(fnc) <- paste("C", 1:4, sep="")
control <- oa.design(L18, factor.names=fnc)The columns of the array have been used in order of appearance.
For designs with relatively few columns,
the properties can sometimes be substantially improved
using option columns with min3 or even min34.fnn <- rep(list(c("low","high")),3)
names(fnn) <- c("n1","n2","n3")
noise <- oa.design(L4.2.3, factor.names = fnn)
ex.inner.outer <- param.design(control,noise,direction="wide",responses=c("force","yield"))
ex.inner.outerclass=design, type= oa.paramwide
NOTE: columns run.no and run.no.std.rp are annotation,
not part of the data frame
Outer array: