\begin{Schunk}
\begin{Sinput}
 library(stationery)
 ## If theme directory does not have required images or TeX files
 ## we need to retrieve them and put them in "theme" directory. 
 logos <- c(logo = "logo.pdf",
              logomini = "logomini.pdf")
 texfiles <- c("guidePreambleSweavel.tex", "mlm.bib")
 getFiles(logos, pkg = "crmda")
\end{Sinput}
\begin{Soutput}
[1] TRUE
\end{Soutput}
\begin{Sinput}
 getFiles(texfiles, pkg = "stationery")
\end{Sinput}
\begin{Soutput}
[1] TRUE
\end{Soutput}
\end{Schunk}
