\begin{Schunk}
\begin{Sinput}
 pdf(file="myfavorite1.pdf", height=8, width=7)
 #hist(x) or whatever
 dev.off()
\end{Sinput}
\end{Schunk}
