Statistics)</em>, 
47, 149-157. 
</p>


<h3>See Also</h3>

<p><code>Saxony</code>, containing the data for families of size 12.
</p>


<h3>Examples</h3>

<pre><code class='language-R'>data(Geissler)
str(Geissler)

# reproduce Saxony data, families of size 12
Saxony12 &lt;- subset(Geissler, size==12, select=c(boys, Freq))
rownames(Saxony12)&lt;-NULL

# make a 1-way table
xtabs(Freq~boys, Saxony12)

# extract data for other family sizes
Saxony11 &lt;- subset(Geissler, size==11, select=c(boys, Freq))
rownames(