\HeaderA{KEGG2SCISI}{Mapping between KEGG and ScISI}{KEGG2SCISI}
\keyword{data}{KEGG2SCISI}
\keyword{manip}{KEGG2SCISI}
\begin{Description}\relax
Count the number of genes shared between a KEGG pathway and a protein
complex from the ScISI interactome.
\end{Description}
\begin{Usage}
\begin{verbatim}
KEGG2SCISI(pw, pc, pcMat, pwMat)
\end{verbatim}
\end{Usage}
\begin{Arguments}
\begin{ldescription}
\item[\code{pw}] list of pathway names
\item[\code{pc}] list of complex names
\item[\code{pwMat}] pathway incidence matrix
\item[\code{pcMat}] complex incidence matrix
\end{ldescription}
\end{Arguments}
\begin{Value}
matrix
\end{Value}
\begin{Author}\relax
N. LeMeur
\end{Author}
\begin{SeeAlso}\relax
\emph{ScISI} \emph{KEGG}
\end{SeeAlso}
\begin{Examples}
\begin{ExampleCode}
data(ScISIC)
## Mapping from Yeast genes to KEGG pathways.
KeggMat <- PWAmat("org.Sc.sgd")
KEGG2SCISI(pw = colnames(KeggMat)[1:5], pc = colnames(ScISIC)[1:5], pwMat =
KeggMat, pcMat =ScISIC)
\end{ExampleCode}
\end{Examples}

