The R Project SVN R

Rev

Rev 59039 | Rev 64657 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 59039 Rev 61160
Line 54... Line 54...
54 
}
 54 
}
55 
 
 55 
 
56 
\seealso{\code{\link{aov}}, \code{\link{model.tables}}}
 56 
\seealso{\code{\link{aov}}, \code{\link{model.tables}}}
57 
 
 57 
 
58 
\examples{
 58 
\examples{
59 
options(contrasts=c("contr.helmert", "contr.poly"))
 59 
options(contrasts = c("contr.helmert", "contr.poly"))
60 
## From Venables and Ripley (2002) p.165.
 60 
## From Venables and Ripley (2002) p.165.
61 
utils::data(npk, package="MASS")
 61 
utils::data(npk, package = "MASS")
62 
npk.aov <- aov(yield ~ block + N*P*K, npk)
 62 
npk.aov <- aov(yield ~ block + N*P*K, npk)
63 
dummy.coef(npk.aov)
 63 
dummy.coef(npk.aov)
64 
 
 64 
 
65 
npk.aovE <- aov(yield ~  N*P*K + Error(block), npk)
 65 
npk.aovE <- aov(yield ~  N*P*K + Error(block), npk)
66 
dummy.coef(npk.aovE)
 66 
dummy.coef(npk.aovE)