\begin{Schunk}
\begin{Sinput}
 anova(bush3, bush5, test="Chisq")
\end{Sinput}
\begin{Soutput}
Analysis of Deviance Table

Model 1: pres04 ~ partyid + sex + owngun + race + wrkslf + realinc + polviews
Model 2: pres04 ~ partyid + sex + owngun + race + wrkslf + realinc + newpolv
  Resid. Df Resid. Dev Df Deviance Pr(>Chi)
1      1044        589                     
2      1046        589 -2   -0.431     0.81
\end{Soutput}
\end{Schunk}
