\begin{Schunk}
\begin{Sinput}
 anova(m2, m1, m1mc, test = "F")
\end{Sinput}
\begin{Soutput}
Analysis of Variance Table

Model 1: prestige ~ educcenter * type
Model 2: prestige ~ education * type
Model 3: prestige ~ educationc * type
  Res.Df    RSS Df   Sum of Sq F Pr(>F)
1     92 5636.5                        
2     92 5636.5  0  9.0949e-13         
3     92 5636.5  0 -9.0949e-13         
\end{Soutput}
\end{Schunk}
