\begin{Schunk}
\begin{Sinput}
 predictOMatic(m1mc, predVals = c("educationc"))
\end{Sinput}
\begin{Soutput}
  educationc type      fit
1  -4.415102   bc 26.09849
2  -2.350102   bc 35.93543
3  -0.190102   bc 46.22492
4   1.959898   bc 56.46677
5   5.174898   bc 71.78190
\end{Soutput}
\end{Schunk}
