\begin{Schunk}
\begin{Sinput}
 library(rockchalk)
 ## The first model's table
 or40b <- outreg(list("Model 1" = mod1), tight = FALSE, varLabels = varLabs)
 ## The second model's table
 or45b <- outreg(list("Model 1" = mod1, "Model 2" = mod2), tight = FALSE, varLabels = varLabs, print.results = FALSE)
 cat(or45b)
\end{Sinput}
\end{Schunk}
