\begin{Schunk}
\begin{Sinput}
 plotCurves(m1, plotx = "x", ylab = "Logistic Probability(y = 1)", legendArgs="none", plotxRange = c(-10, 15))
\end{Sinput}
\end{Schunk}
