\begin{Schunk}
\begin{Sinput}
 pdf.options(onefile = FALSE, family = "Times", paper = "special", height = 4, width = 6)
 ps.options(horizontal = FALSE, onefile = FALSE, family = "Times", paper = "special", height = 4, width = 6 )
 options(papersize="special")
\end{Sinput}
\end{Schunk}
