\HeaderA{unsplitS4}{Combines a list with elements that are AnnotatedSnpSets into one AnnotatedSnpSet.}{unsplitS4}
\keyword{manip}{unsplitS4}
\begin{Description}\relax
After splitting an \code{AnnotatedSnpSet} by chromosome, for instance,
this function will reproduce the original object from the list.
\end{Description}
\begin{Usage}
\begin{verbatim}
unsplitS4(value, featureData)
\end{verbatim}
\end{Usage}
\begin{Arguments}
\begin{ldescription}
\item[\code{value}] Object of class \code{AnnotatedSnpSet}
\item[\code{featureData}] Object of class \code{AnnotatedDataFrame}
\end{ldescription}
\end{Arguments}
\begin{Details}\relax
\end{Details}
\begin{Value}
\begin{ldescription}
\item[\code{this-is-escaped-codenormal-bracket15bracket-normal}] An object of class \code{AnnoatedSnpSet}
\end{ldescription}

...
\end{Value}
\begin{Note}\relax
\end{Note}
\begin{Author}\relax
Robert Scharpf
\end{Author}
\begin{References}\relax
\end{References}
\begin{SeeAlso}\relax
\code{\LinkA{split}{split}}, \code{\LinkA{AnnotatedSnpSet}{AnnotatedSnpSet}}
\end{SeeAlso}
\begin{Examples}
\begin{ExampleCode}
data(annSnpset)
x <- split(annSnpset, chromosome(annSnpset))
class(x)
length(x)
xx <- unsplitS4(x, featureData(annSnpset))
class(xx)
\end{ExampleCode}
\end{Examples}

