\Header{cars}{Stopping Distances of Cars}
\keyword{datasets}{cars}
\begin{Description}\relax
The data give the speed of cars and the distances taken to stop.
Note that the data were recorded in the 1920s.\end{Description}
\begin{Usage}
\begin{verbatim}data(cars)\end{verbatim}
\end{Usage}
\begin{Format}\relax
A data frame with 50 observations on 2 variables.
\Tabular{rlll}{
[,1]  & speed  & numeric  & Speed (mph)\\{}
[,2]  & dist   & numeric  & Stopping distance (ft)
}\end{Format}
\begin{Source}\relax
Ezekiel, M. (1930) \emph{Methods of Correlation Analysis}.  Wiley.\end{Source}
\begin{References}\relax
McNeil, D. R. (1977) \emph{Interactive Data Analysis}.  Wiley.\end{References}
\begin{Examples}
\begin{ExampleCode}
data(cars)
plot(cars, xlab = "Speed (mph)", ylab = "Stopping distance (ft)",
     las = 1)
lines(lowess(cars$speed, cars$dist, f = 2/3, iter = 3), col = "red")
title(main = "cars data")
plot(cars, xlab = "Speed (mph)", ylab = "Stopping distance (ft)",
     las = 1, log = "xy")
title(main = "cars data (logarithmic scales)")
lines(lowess(cars$speed, cars$dist, f = 2/3, iter = 3), col = "red")
summary(fm1 <- lm(log(dist) ~ log(speed), data = cars))
opar <- par(mfrow = c(2, 2), oma = c(0, 0, 1.1, 0),
            mar = c(4.1, 4.1, 2.1, 1.1))
plot(fm1)
par(opar)
\end{ExampleCode}
\end{Examples}

