\begin{Schunk}
\begin{Sinput}
 predictOMatic(m1, predVals = c("education"))
\end{Sinput}
\begin{Soutput}
  education type      fit
1     6.380   bc 26.09849
2     8.445   bc 35.93543
3    10.605   bc 46.22492
4    12.755   bc 56.46677
5    15.970   bc 71.78190
\end{Soutput}
\begin{Sinput}
 predictOMatic(m2, predVals = c("educcenter"))
\end{Sinput}
\begin{Soutput}
  educcenter type      fit
1 -4.3580392   bc 26.09849
2 -2.2930392   bc 35.93543
3 -0.1330392   bc 46.22492
4  2.0169608   bc 56.46677
5  5.2319608   bc 71.78190
\end{Soutput}
\end{Schunk}
