\begin{Schunk}
\begin{Sinput}
 table("ethnicity factor" = affect$ethnicityf, "ethnicity" = affect$ethnicity)
\end{Sinput}
\begin{Soutput}
                ethnicity
ethnicity factor Asian Black Hispanic White
        Asian       38     0        0     0
        Black        0    19        0     0
        Hispanic     0     0       67     0
        White        0     0        0   256
\end{Soutput}
\end{Schunk}
