Basit bir life annuity

R ile Hayat Sigortası Ürünlerinin Değerlemesi

Roel Verbelen, Ph.D.

Statistician, Finity Consulting

Life annuity

$\qquad$ EPV şu: $$_kE_x = 1 \cdot \ v(k) \cdot \ {}_kp_x \, . $$

$\quad \,$ BD, $v(k)$.

i <- 0.03
discount_factor <- (1 + i) ^ - 5
1 * discount_factor

0.8626088

$\quad \,$ Beklenen BD, $v(k) \cdot {}_kp_x$.

qx <- life_table$qx; px <- 1 - qx
kpx <- prod(px[(65 + 1):(69 + 1)])
kpx

0.9144015

1 * discount_factor * kpx

0.7887708

R ile Hayat Sigortası Ürünlerinin Değerlemesi