Get individual by pid

get_individual(population, pid)

Arguments

population

Population

pid

pid

Value

Individual

Examples

sim <- sample_geneology(100, 10) indv <- get_individual(sim$population, 1) get_pid(indv)
#> [1] 1