\begin{Schunk}
\begin{Sinput}
 ## Create data with x1 and x2 correlated at 0.10
 require(rockchalk)
 dat <- genCorrelatedData(rho=0.10, stde=7)
 par(mar= c(1,1,1,1))
\end{Sinput}
\end{Schunk}
