\begin{Schunk}
\begin{Sinput}
 modr2 <- lm( statusquo ~ region, data=Chile, x=T, y=T)
 outreg(modr2, tight=FALSE, showAIC=F)
\end{Sinput}
\begin{tabular}{*{3}{l}}
\hline
                  & \multicolumn{2}{c}{M1}   \tabularnewline
                   &Estimate  &(S.E.)  \tabularnewline
 \hline
 \hline
   (Intercept)     &-0.030   &   (0.040) \tabularnewline
   regionM         &0.317**   &   (0.107) \tabularnewline
   regionN         &0.165*   &   (0.068) \tabularnewline
   regionS         &0.195***   &   (0.055) \tabularnewline
   regionSA        &-0.150**   &   (0.052) \tabularnewline
 \hline
 N                 &2683       &        \tabularnewline
 RMSE             &0.989         & \tabularnewline
 $R^2$             &0.024         & \tabularnewline
 adj $R^2$         &0.023         & \tabularnewline
 \hline
\hline
 
 \multicolumn{3}{c}{${*  p}\le 0.05$${*\!\!*  p}\le 0.01$${*\!\!*\!\!*  p}\le 0.001$}\tabularnewline
 \end{tabular}\end{Schunk}
