\begin{Schunk}
\begin{Sinput}
 outreg(list(ols1, bushideoglm1, bushideoProbit1), tight=T, showAIC=T, modelLabels=c("OLS","Logit","Probit"), varLab = vl)
\end{Sinput}
\begin{tabular}{*{4}{l}}
\hline
     &  OLS&  Logit&  Probit\tabularnewline
   & Estimate & Estimate & Estimate \tabularnewline
    & (S.E.) & (S.E.) & (S.E.)\tabularnewline
 \hline
 \hline
  (Intercept)    &-0.248*** &-3.952*** &-2.304*** \tabularnewline
     &  (0.045) &  (0.317) &  (0.173)\tabularnewline
  Ideology    &0.181*** &0.952*** &0.556*** \tabularnewline
     &  (0.010) &  (0.070) &  (0.038)\tabularnewline
 \hline
 N & 809 & 809 & 809 \tabularnewline
 RMSE             &0.415   &       &       \tabularnewline
 $R^2$             &0.304   &       &       \tabularnewline
 Deviance         &       &833.913   &836.019   \tabularnewline
 $-2LLR (Model \chi^2)$  &  &   276.885*** &   274.778*** \tabularnewline
 AIC & 876.564 & 837.913 & 840.019\tabularnewline
 \hline
\hline
 
 \multicolumn{4}{c}{${*  p}\le 0.05$${*\!\!*  p}\le 0.01$${*\!\!*\!\!*  p}\le 0.001$}\tabularnewline
 \end{tabular}\end{Schunk}
