\Header{getData.lme}{Extract lme Object Data}
\alias{getData.nlme}{getData.lme}
\alias{getData.nls}{getData.lme}
\keyword{models}{getData.lme}
\begin{Description}\relax
If present in the calling sequence used to produce \code{object}, the
data frame used to fit the model is obtained.
\end{Description}
\begin{Usage}
\begin{verbatim}
## S3 method for class 'lme':
getData(object)
\end{verbatim}
\end{Usage}
\begin{Arguments}
\begin{ldescription}
\item[\code{object}] an object inheriting from class \code{lme}, representing
a linear mixed-effects fitted model.
\end{ldescription}
\end{Arguments}
\begin{Value}
if a \code{data} argument is present in the calling sequence that
produced \code{object}, the corresponding data frame (with
\code{na.action} and \code{subset} applied to it, if also present in
the call that produced \code{object}) is returned;
else, \code{NULL} is returned.
\end{Value}
\begin{Author}\relax
Jose Pinheiro \email{Jose.Pinheiro@pharma.novartis.com} and Douglas Bates \email{bates@stat.wisc.edu}
\end{Author}
\begin{SeeAlso}\relax
\code{\Link{lme}}
\end{SeeAlso}
\begin{Examples}
\begin{ExampleCode}
data(Ovary)
fm1 <- lme(follicles ~ sin(2*pi*Time) + cos(2*pi*Time), data = Ovary,
           random = ~ sin(2*pi*Time))
getData(fm1)
\end{ExampleCode}
\end{Examples}

