Mean present value of loss at duration t for whole life insurance
ELtx.RdComputes the Chapter 10 conditional mean \(E[{}_tL_x \mid K_x \ge t]\) for a fully discrete whole life insurance.
Examples
prem <- Px(40, i = 0.05, model = "uniform", omega = 100)
ELtx(40, t = 10, i = 0.05, P = prem, model = "uniform", omega = 100)
#> [1] 0.07250474