\begin{Schunk}
\begin{Sinput}
 m3 <- lm (th.bush.kerry ~ V045117 + V043116 + V043210 + V043213 + V045145X + V041109A, data = mydta1)
\end{Sinput}
\end{Schunk}
