Note that generation 0 is final, end generation. 1 is second last generation etc.

get_generation(individual)

Arguments

individual

Individual

Value

generation

Examples

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