\begin{Schunk}
\begin{Sinput}
 drop1(bushlogit6, test="Chisq")
\end{Sinput}
\begin{Soutput}
Single term deletions

Model:
bushvote ~ V023010 + ideoln + partyid + useconn + educf
        Df Deviance    AIC     LRT  Pr(>Chi)    
<none>       392.39 416.39                      
V023010  1   494.32 516.32 101.927 < 2.2e-16 ***
ideoln   1   404.42 426.42  12.027 0.0005243 ***
partyid  2   546.73 566.73 154.338 < 2.2e-16 ***
useconn  1   392.87 414.87   0.479 0.4889513    
educf    6   405.39 417.39  12.992 0.0431597 *  
---
Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
\end{Soutput}
\end{Schunk}
