Requires that haplotypes are first populated, e.g.
with pedigrees_all_populate_haplotypes()
,
pedigrees_all_populate_haplotypes_custom_founders()
, or
pedigrees_all_populate_haplotypes_ladder_bounded()
.
get_haplotype(individual)
Individual to get haplotypes for.
Haplotype for individual
.
sim <- sample_geneology(100, 10)
peds <- build_pedigrees(sim$population)
pedigrees_all_populate_haplotypes(peds, 2, c(1, 1))
get_haplotype(sim$end_generation_individuals[[1]])
#> [1] -5 -1