Calculate the cumulative risk.
cumrisk.Rd
It was used to calculate the cumulative risk based on cumulative rate.
Examples
px <- c(20005, 86920, 102502, 151494, 182932, 203107, 240289, 247076, 199665,
163820, 145382, 86789, 69368, 51207, 39112, 20509, 12301, 6586, 1909)
dx <- c(156, 58, 47, 49, 48, 68, 120, 162, 160, 294, 417, 522, 546, 628,
891, 831, 926, 731, 269)
mx <- dx / px
cumrate(mx, eage = 70)
#> Cumulative Rate(1/1)
#> 0.497705
cumrisk(cumrate(mx, eage = 70))
#> Cumulative Risk (1/100)
#> 39.21