\begin{Schunk}
\begin{Sinput}
 or1 <- outreg(list(mod1age, mod2age), tight = TRUE, modelLabels = c("Age Only", "Age With Gender"))
 outreg2HTML(or1, file = "or1-test.html")
\end{Sinput}
\end{Schunk}
