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)
#> 13 18 22 27 30 34 12 38 45 58 20 59 
#>  1  1  1  1  1  1  1  1  1  1  1  1