Life tables (Example data)

• Global Health Observatory Life Tables are included in the hmsidwR package

library(tidyverse)
library(hmsidwR)
library(knitr)
gho_2000 <- gho_lifetables %>%
  filter(sex == "both", year == 2000 ) %>% 
  select(-sex,-year)

gho_2000_wide <- gho_2000 %>% 
  pivot_wider(names_from = indicator, values_from = value) %>% 
  select(age,lx,nLx,Tx,ex) 

kable(gho_2000_wide)

age	lx	nLx	Tx	ex
<1	100000.00	95759.05	6679430.6	66.794306
01-04	94885.68	374204.06	6583671.6	69.385304
05-09	92661.24	461681.23	6209467.5	67.012565
10-14	92011.25	459158.72	5747786.3	62.468299
15-19	91652.24	456881.71	5288627.6	57.703201
20-24	91100.44	453499.03	4831745.9	53.037567
25-29	90299.17	449126.84	4378246.8	48.486015
30-34	89351.57	443954.74	3929120.0	43.973711
35-39	88230.33	437678.29	3485165.2	39.500762
40-44	86840.99	429722.78	3047487.0	35.092727
45-49	85048.13	419270.21	2617764.2	30.779798
50-54	82659.96	405039.99	2198494.0	26.596844
55-59	79356.04	385340.59	1793454.0	22.600094
60-64	74780.20	357998.96	1408113.4	18.830031
65-69	68419.39	320671.00	1050114.4	15.348200
70-74	59849.01	270832.02	729443.4	12.188061
75-79	48483.79	209607.30	458611.4	9.459066
80-84	35359.13	141472.33	249004.1	7.042145
85+	21229.80	107531.77	107531.8	5.065132