\begin{Schunk}
\begin{Sinput}
 anova(modlm1, modlm2)
\end{Sinput}
\begin{Soutput}
Analysis of Variance Table

Model 1: posAffect ~ -1 + gender/agency
Model 2: posAffect ~ -1 + gender + agency
  Res.Df    RSS Df Sum of Sq      F  Pr(>F)  
1    376 137.82                              
2    377 138.92 -1    -1.095 2.9873 0.08474 .
---
Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
\end{Soutput}
\end{Schunk}
