\name{xmp01.15}
\alias{xmp01.15}
\docType{data}
\title{data from Example 1.15}
\description{
  The \code{xmp01.15} data frame has 20 rows and 1 columns.
}
\format{
  This data frame contains the following columns:
  \describe{
    \item{lifetime}{
      a numeric vector of lifetimes (hr) of a certain type of
      incandescent light bulb.
    }
  }
}
\source{
  Devore, J. L. (2003) \emph{Probability and Statistics for Engineering
    and the Sciences (6th ed)}, Duxbury
}
\examples{
with(xmp01.15, summary(lifetime))              # produces mean, median, etc.
with(xmp01.15, mean(lifetime, trim = 0.1))     # 10\% trimmed mean
with(xmp01.15, mean(lifetime, trim = 0.2))     # 20\% trimmed mean
with(xmp01.15, dotchart(lifetime))
with(xmp01.15, hist(lifetime))                 # display a histogram
with(xmp01.15, rug(lifetime))                  # add the data
with(xmp01.15, abline(v = median(lifetime), col = 2, lty = 2))
with(xmp01.15, abline(v = mean(lifetime), col = 3, lty = 2))
with(xmp01.15, abline(v = mean(lifetime, trim = 0.1), col = 4, lty = 2))
with(xmp01.15, abline(v = mean(lifetime, trim = 0.2), col = 5, lty = 2))
legend(600, 6,
  c("median", "mean", "10\% trimmed mean", "20\% trimmed mean"),
  col = 2:5, lty = 2)
}
\keyword{datasets}