\begin{Schunk}
\begin{Sinput}
 mod <- mcGraph2(dat$x1, dat$x2, dat$y, rescaley = 1.0, theta = 60)
\end{Sinput}
\end{Schunk}
