Get distribution of pedigree sizes

pedigrees_table(pedigrees)

## Arguments

pedigrees Pedigrees

## Examples

sim <- sample_geneology(100, 10)
peds <- build_pedigrees(sim\$population)
pedigrees_table(peds)#> 10 55 16 49 37 11 22 21 19 18 15 14 13 12
#>  2  1  1  1  1  2  1  1  1  2  2  1  1  1