\begin{Schunk}
\begin{Sinput}
 by(Chile$statusquo, Chile$sex, mean, na.rm = TRUE)
\end{Sinput}
\begin{Soutput}
Chile$sex: F
[1] 0.06570627
------------------------------------------------------------------------------------------------------------------------ 
Chile$sex: M
[1] -0.06835453
\end{Soutput}
\begin{Sinput}
 t.test(statusquo ~ sex, var.equal=TRUE, data=Chile) 
\end{Sinput}
\begin{Soutput}
	Two Sample t-test

data:  statusquo by sex
t = 3.4779, df = 2681, p-value = 0.0005135
alternative hypothesis: true difference in means is not equal to 0
95 percent confidence interval:
 0.05847624 0.20964537
sample estimates:
mean in group F mean in group M 
     0.06570627     -0.06835453 
\end{Soutput}
\end{Schunk}
