\begin{Schunk}
\begin{Sinput}
 dat <- rockchalk::genCorrelatedData(N = 100, rho = 0.3, beta = c(1, 1.0, -1.1, 0.0))
 m1 <- with(dat, aRegMod(x1, x2, y))
\end{Sinput}
\end{Schunk}
