\HeaderA{scanSmc}{Scan through smc objects}{scanSmc}
\keyword{manip}{scanSmc}
\begin{Description}\relax
This function scans through smc objects and returns those with specified attributes.
\end{Description}
\begin{Usage}
\begin{verbatim}
scanSmc(smcList, scanSlot = "private", scanFor = "no")
\end{verbatim}
\end{Usage}
\begin{Arguments}
\begin{ldescription}
\item[\code{smcList}] list of "smc" objects 
\item[\code{scanSlot}] character - which smc slot to investigate 
\item[\code{scanFor}] character - what character string to look for 
\end{ldescription}
\end{Arguments}
\begin{Value}
a list of "smc" objects with the desired attribute
\end{Value}
\begin{Author}\relax
Karl Dykema <karl.dykema@vai.org>
\end{Author}
\begin{Examples}
\begin{ExampleCode}

datadir <- system.file("data", package = "PGSEA")
sample <- readGmt(file.path(datadir, "sample.gmt"))
sample[1:2] <- editSmc(sample[1:2],"creator","Joe Smith")

scanned <- scanSmc(sample,"creator","Joe Smith")

str(scanned)

\end{ExampleCode}
\end{Examples}

