\HeaderA{case/variable.names}{Case and Variable Names of Fitted Models}{case/variable.names}
\aliasA{case.names}{case/variable.names}{case.names}
\methaliasA{case.names.lm}{case/variable.names}{case.names.lm}
\aliasA{variable.names}{case/variable.names}{variable.names}
\methaliasA{variable.names.lm}{case/variable.names}{variable.names.lm}
\keyword{regression}{case/variable.names}
\keyword{models}{case/variable.names}
\begin{Description}\relax
Simple utilities returning (non-missing) case names, and
(non-eliminated) variable names.
\end{Description}
\begin{Usage}
\begin{verbatim}
case.names(object, ...)
## S3 method for class 'lm':
case.names(object, full = FALSE, ...)

variable.names(object, ...)
## S3 method for class 'lm':
variable.names(object, full = FALSE, ...)
\end{verbatim}
\end{Usage}
\begin{Arguments}
\begin{ldescription}
\item[\code{object}] an \R{} object, typically a fitted model.
\item[\code{full}] logical; if \code{TRUE}, all names (including zero weights,
\dots) are returned.
\item[\code{...}] further arguments passed to or from other methods.
\end{ldescription}
\end{Arguments}
\begin{Value}
A character vector.
\end{Value}
\begin{SeeAlso}\relax
\code{\LinkA{lm}{lm}}
\end{SeeAlso}
\begin{Examples}
\begin{ExampleCode}
x <- 1:20
y <-  x + (x/4 - 2)^3 + rnorm(20, s=3)
names(y) <- paste("O",x,sep=".")
ww <- rep(1,20); ww[13] <- 0
summary(lmxy <- lm(y ~ x + I(x^2)+I(x^3) + I((x-10)^2),
                   weights = ww), cor = TRUE)
variable.names(lmxy)
variable.names(lmxy, full= TRUE)# includes the last
case.names(lmxy)
case.names(lmxy, full = TRUE)# includes the 0-weight case
\end{ExampleCode}
\end{Examples}

