\Header{balancedGrouped}{Create a groupedData object from a matrix}
\keyword{data}{balancedGrouped}
\begin{Description}\relax
Create a \code{groupedData} object from a data matrix.  This function
can be used only with balanced data.  The opposite conversion, from a
\code{groupedData} object to a \code{matrix}, is done with \code{asTable}.
\end{Description}
\begin{Usage}
\begin{verbatim}
balancedGrouped(form, data, labels=NULL, units=NULL)
\end{verbatim}
\end{Usage}
\begin{Arguments}
\begin{ldescription}
\item[\code{form}] A formula of the form \code{y \textasciitilde{} x | g} giving the name of
the response, the primary covariate, and the grouping factor.
\item[\code{data}] A matrix or data frame containing the values of the
response grouped according to the levels of the grouping factor
(rows) and the distinct levels of the primary covariate (columns).
The \code{dimnames} of the matrix are used to construct the levels of
the grouping factor and the primary covariate.
\item[\code{labels}] an optional list of character strings giving labels for
the response and the primary covariate.  The label for the primary
covariate is named \code{x} and that for the response is named
\code{y}.  Either label can be omitted.
\item[\code{units}] an optional list of character strings giving the units for
the response and the primary covariate.  The units string for the
primary covariate is named \code{x} and that for the response is
named \code{y}.  Either units string can be omitted.
\end{ldescription}
\end{Arguments}
\begin{Value}
A balanced \code{groupedData} object.
\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{groupedData}}, \code{\Link{isBalanced}}, \code{\Link{asTable}}
\end{SeeAlso}
\begin{Examples}
\begin{ExampleCode}
data(Orthodont)
OrthoMat <- asTable( Orthodont )
Orth2 <- balancedGrouped(distance ~ age | Subject, data = OrthoMat,
    labels = list(x = "Age",
                  y = "Distance from pituitary to pterygomaxillary fissure"),
    units = list(x = "(yr)", y = "(mm)"))
Orth2[ 1:10, ]        ## check the first few entries
\end{ExampleCode}
\end{Examples}

