\begin{Schunk}
\begin{Sinput}
 ## Run a new regression
 mod2age <- lm(th.bush.kerry ~ V043250 + V041109A, data = mydta1)
 ## Put 2 regressions in same table
 outreg(list(mod1age, mod2age), tight = TRUE, modelLabels = c("Age Only","Age With Gender"))
\end{Sinput}
\end{Schunk}
