\begin{Schunk}
\begin{Sinput}
 plotSlopes(m6, plotx = "V043250", modx = "V041109A", xlab = "Age", ylab = "Bush-Kerry Thermometer", ylim = c(-100, 150), col = c("black","gray60"), llwd = c(2,3))
\end{Sinput}
\end{Schunk}
