\HeaderA{UKLungDeaths}{Monthly Deaths from Lung Diseases in the UK}{UKLungDeaths}
\aliasA{fdeaths}{UKLungDeaths}{fdeaths}
\aliasA{ldeaths}{UKLungDeaths}{ldeaths}
\aliasA{mdeaths}{UKLungDeaths}{mdeaths}
\keyword{datasets}{UKLungDeaths}
\begin{Description}\relax
Three time series giving the monthly deaths from bronchitis,
emphysema and asthma in the UK, 1974--1979,
both sexes (\code{ldeaths}), males (\code{mdeaths}) and
females (\code{fdeaths}).
\end{Description}
\begin{Usage}
\begin{verbatim}
ldeaths
fdeaths
mdeaths
\end{verbatim}
\end{Usage}
\begin{Source}\relax
P. J. Diggle (1990)
\emph{Time Series: A Biostatistical Introduction.}
Oxford, table A.3
\end{Source}
\begin{Examples}
\begin{ExampleCode}
require(stats); require(graphics) # for time
plot(ldeaths) 
plot(mdeaths, fdeaths) 
## Better labels:
yr <- floor(tt <- time(mdeaths))
plot(mdeaths, fdeaths,
     xy.labels = paste(month.abb[12*(tt - yr)], yr-1900, sep="'"))
\end{ExampleCode}
\end{Examples}

