\begin{Schunk}
\begin{Sinput}
 termplot(m3, se=TRUE, partial.resid=T, terms="V043210",xlab="V043210: Gay Marriage")
\end{Sinput}
\end{Schunk}
