\Header{wtloss}{Weight Loss Data from an Obese Patient}
\keyword{datasets}{wtloss}
\begin{Description}\relax
The data frame gives the weight, in kilograms, of an obese patient at 52
time points over an 8 month period of a weight rehabilitation programme.\end{Description}
\begin{Usage}
\begin{verbatim}
data(wtloss)
\end{verbatim}
\end{Usage}
\begin{Format}\relax
This data frame contains the following columns:
\describe{
\item[\code{Days}] Time in days since the start of the programme.

\item[\code{Weight}] Weight in kilograms of the patient.
}\end{Format}
\begin{Source}\relax
Dr T. Davies, Adelaide.\end{Source}
\begin{References}\relax
Venables, W. N. and Ripley, B. D. (2002)
\emph{Modern Applied Statistics with S.} Fourth edition.  Springer.\end{References}
\begin{Examples}
\begin{ExampleCode}
library(nls)
wtloss.fm <- nls(Weight ~ b0 + b1*2^(-Days/th),
    data = wtloss, start = list(b0=90, b1=95, th=120),
    trace = TRUE)
\end{ExampleCode}
\end{Examples}

