\HeaderA{InsectSprays}{Effectiveness of Insect Sprays}{InsectSprays}
\keyword{datasets}{InsectSprays}
\begin{Description}\relax
The counts of insects in agricultural experimental units treated with
different insecticides.
\end{Description}
\begin{Usage}
\begin{verbatim}InsectSprays\end{verbatim}
\end{Usage}
\begin{Format}\relax
A data frame with 72 observations on 2 variables.
\Tabular{rlll}{
[,1]  & count  & numeric  & Insect count\\{}
[,2]  & spray  & factor   & The type of spray
}
\end{Format}
\begin{Source}\relax
Beall, G., (1942)
The Transformation of data from entomological field experiments,
\emph{Biometrika}, \bold{29}, 243--262.
\end{Source}
\begin{References}\relax
McNeil, D. (1977) \emph{Interactive Data Analysis}.
New York: Wiley.
\end{References}
\begin{Examples}
\begin{ExampleCode}
require(stats); require(graphics)
boxplot(count ~ spray, data = InsectSprays,
        xlab = "Type of spray", ylab = "Insect count",
        main = "InsectSprays data", varwidth = TRUE, col = "lightgray")
fm1 <- aov(count ~ spray, data = InsectSprays)
summary(fm1)
opar <- par(mfrow = c(2,2), oma = c(0, 0, 1.1, 0))
plot(fm1)
fm2 <- aov(sqrt(count) ~ spray, data = InsectSprays)
summary(fm2)
plot(fm2)
par(opar)
\end{ExampleCode}
\end{Examples}

