\HeaderA{writeSmc}{writeSmc}{writeSmc}
\keyword{data}{writeSmc}
\begin{Description}\relax
This function will write out SMC objects to individual text files
\end{Description}
\begin{Usage}
\begin{verbatim}
writeSmc(x)
\end{verbatim}
\end{Usage}
\begin{Arguments}
\begin{ldescription}
\item[\code{x}] an object of class SMC  
\end{ldescription}
\end{Arguments}
\begin{Details}\relax
The file name is determined by the reference slot of the SMC object.
\end{Details}
\begin{Author}\relax
Kyle Furge <kyle.furge@vai.org> and Karl Dykema <karl.dykema@vai.org>
\end{Author}
\begin{SeeAlso}\relax
\code{\LinkA{writeSmc}{writeSmc}}
\end{SeeAlso}
\begin{Examples}
\begin{ExampleCode}

datadir <- system.file("data", package = "PGSEA")
sample <- readGmt(file.path(datadir, "sample.gmt"))
str(sample)
sample[[1]]@reference <- "fileName"

## Not run: 
        writeSmc(sample[[1]])
## End(Not run)


\end{ExampleCode}
\end{Examples}

