Fails when any of the following holds: ages are not unique and contiguous
from 0; any of mx, qx, ax, lx, dx, Lx, Tx, ex is missing or
non-finite; lx increases with age; Lx or ex is not positive; qx lies
outside [0, 1]; mx = dx/Lx does not hold; or life expectancy at birth is
outside the plausibility band (15, 100] years.
validate_life_table(lt)Output of build_life_table() for one year and sex.
list(passed = logical, issues = named list).
mx <- data.frame(age = 0:100, mx = 0.0003 * exp(0.07 * (0:100)))
validate_life_table(build_life_table(mx, "female"))
#> $passed
#> [1] TRUE
#>
#> $issues
#> list()
#>