\begin{Schunk}
\begin{Sinput}
 pdf("myfirst.pdf")  
 hist(rnorm(1000), main = "1000 random normals") 
 dev.off()
\end{Sinput}
\end{Schunk}
