\begin{Schunk}
\begin{Sinput}
 box(which="outer", col="gray90", lty=1)
\end{Sinput}
\end{Schunk}
