library(dplyr)
## life table for females based on 'level 1'
## mortality rates "West" model life table
west_lifetab |>
filter(sex == "Female",
level == 1) |>
lifetab(mx = mx)
## change method for infant and children from
## default ("constant") to "CD"
west_lifetab |>
filter(sex == "Female",
level == 1) |>
lifetab(mx = mx,
sex = sex,
infant = "CD",
child = "CD")
## calculate life expectancies
## for all levels, using the 'by'
## argument to distinguish levels
west_lifetab |>
lifeexp(mx = mx,
sex = sex,
infant = "CD",
child = "CD",
by = level)
## obtain the same result using
## 'group_by'
west_lifetab |>
group_by(level) |>
lifeexp(mx = mx,
sex = sex,
infant = "CD",
child = "CD")
## calculations based on 'qx'
west_lifetab |>
lifeexp(qx = qx,
sex = sex,
by = level)
## life expectancy at age 60
west_lifetab |>
filter(level == 10) |>
lifeexp(mx = mx,
at = 60,
sex = sex)
## life expectancy at ages 0 and 60
west_lifetab |>
filter(level == 10) |>
lifeexp(mx = mx,
at = c(0, 60),
sex = sex)
Run the code above in your browser using DataLab