Get pedigree size

Get pedigree size

pedigree_size(ped)

Arguments

ped

Pedigree

Examples

sim <- sample_geneology(100, 10)
peds <- build_pedigrees(sim$population)
pedigree_size(peds[[1]])
#> [1] 51