The R Project SVN R

Rev

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

Rev 59718 Rev 61160
Line 36... Line 36...
36 
  \emph{Multivariate Analysis of Variance and Repeated Measures.}
 36 
  \emph{Multivariate Analysis of Variance and Repeated Measures.}
37 
  Chapman and Hall.
 37 
  Chapman and Hall.
38 
}
 38 
}
39 
\examples{
 39 
\examples{
40 
## From Venables and Ripley (2002) p.165.
 40 
## From Venables and Ripley (2002) p.165.
41 
utils::data(npk, package="MASS")
 41 
utils::data(npk, package = "MASS")
42 
 
 42 
 
43 
## Set orthogonal contrasts.
 43 
## Set orthogonal contrasts.
44 
op <- options(contrasts=c("contr.helmert", "contr.poly"))
 44 
op <- options(contrasts = c("contr.helmert", "contr.poly"))
45 
 
 45 
 
46 
## Fake a 2nd response variable
 46 
## Fake a 2nd response variable
47 
npk2 <- within(npk, foo <- rnorm(24))
 47 
npk2 <- within(npk, foo <- rnorm(24))
48 
( npk2.aov <- manova(cbind(yield, foo) ~ block + N*P*K, npk2) )
 48 
( npk2.aov <- manova(cbind(yield, foo) ~ block + N*P*K, npk2) )
49 
summary(npk2.aov)
 49 
summary(npk2.aov)