\begin{Schunk}
\begin{Sinput}
   levels(dat$partyid)
\end{Sinput}
\begin{Soutput}
[1] "STRONG DEMOCRAT"    "NOT STR DEMOCRAT"   "IND,NEAR DEM"       "INDEPENDENT"        "IND,NEAR REP"       "NOT STR REPUBLICAN" "STRONG REPUBLICAN"  "OTHER PARTY"       
\end{Soutput}
\end{Schunk}
