\Header{aov}{Fit an Analysis of Variance Model}
\alias{print.aov}{aov}
\alias{print.aovlist}{aov}
\alias{print.summary.aov}{aov}
\alias{print.summary.aovlist}{aov}
\alias{summary.aov}{aov}
\alias{summary.aovlist}{aov}
\keyword{models}{aov}
\keyword{regression}{aov}
\begin{Description}\relax
Fit an analysis of variance model by a call to \code{lm} for each stratum.\end{Description}
\begin{Usage}
\begin{verbatim}
aov(formula, data = NULL, projections = FALSE, contrasts = NULL, ...)
se.aov(object, n, type = "means") 
\end{verbatim}
\end{Usage}
\begin{Arguments}
\begin{ldescription}
\item[\code{formula}] A formula specifying the model.
\item[\code{data}] A data frame in which the variables specified in the
formula will be found. If missing, the variables are searched for in
the standard way.
\item[\code{projections}] Logical flag: should the projections be returned?
\item[\code{contrasts}] A list of contrasts to be used for some of the factors
in the formula. These are not used for any \code{Error} term, and
supplying contrasts for factors only in the \code{Error} term will give
a warning.
\item[\code{...}] Arguments to be passed to \code{lm}, such as \code{subset}
or \code{na.action}.
\end{ldescription}
\end{Arguments}
\begin{Details}\relax
This provides a wrapper to \code{lm} for fitting linear models to
balanced or unbalanced experimental designs.

The main difference from \code{lm} is in the way \code{print},
\code{summary} and so on handle the fit: this is expressed in the
traditional language of the analysis of variance rather than of linear
models.

If the formula contains a single \code{Error} term, this is used to
specify error strata, and appropriate models are fitted within each
error stratum.

The formula can specify multiple responses.\end{Details}
\begin{Value}
An object of class \code{c("aov", "lm")} or for multiple responses
of class \code{c("maov", "aov", "mlm", "lm")} or for multiple error
strata of class \code{"aovlist"}.  There are
\code{\Link{print}} and \code{\Link{summary}} methods available for these.\end{Value}
\begin{Author}\relax
B. D. Ripley\end{Author}
\begin{SeeAlso}\relax
\code{\Link{lm}}, \code{\Link{alias}}, \code{\Link{proj}},
\code{\Link{model.tables}}\end{SeeAlso}
\begin{Examples}
\begin{ExampleCode}
## From Venables and Ripley (1997) p.210.
N <- c(0,1,0,1,1,1,0,0,0,1,1,0,1,1,0,0,1,0,1,0,1,1,0,0)
P <- c(1,1,0,0,0,1,0,1,1,1,0,0,0,1,0,1,1,0,0,1,0,1,1,0)
K <- c(1,0,0,1,0,1,1,0,0,1,0,1,0,1,1,0,0,0,1,1,1,0,1,0)
yield <- c(49.5,62.8,46.8,57.0,59.8,58.5,55.5,56.0,62.8,55.8,69.5,55.0,
           62.0,48.8,45.5,44.2,52.0,51.5,49.8,48.8,57.2,59.0,53.2,56.0)
npk <- data.frame(block=gl(6,4), N=factor(N), P=factor(P),
                  K=factor(K), yield=yield)

( npk.aov <- aov(yield ~ block + N*P*K, npk) )
summary(npk.aov)
coefficients(npk.aov)

## as a test, not particularly sensible statistically
op <- options(contrasts=c("contr.helmert", "contr.treatment"))
npk.aovE <- aov(yield ~  N*P*K + Error(block), npk)
npk.aovE
summary(npk.aovE)
options(op)# reset to previous
\end{ExampleCode}
\end{Examples}

