Calcule de pensie cu luarea în considerare a mortalității

Cum se schimbă valoarea prezentă dacă iei în considerare mortalitatea? Plățile de pensie nu mai sunt garantate, ci depind de supraviețuirea beneficiarului. Probabilitățile de supraviețuire pe un an px au fost preîncărcate, împreună cu variabilele benefits, discount_factors, PV_65 și PV_20 create în exercițiul anterior.

Acest exercițiu face parte din cursul

Evaluarea produselor de asigurare de viață în R

Vezi cursul

Instrucțiuni pentru exercițiu

Stochează probabilitățile de supraviețuire ale unei persoane de 65 de ani până la vârsta de 100 de ani în variabila kpx. Asigură-te că kpx începe cu valoarea 1.
Calculează VPA (valoarea prezentă actuarială) la vârsta de 65 de ani a pensiei, luând în considerare mortalitatea. Atribuie rezultatul variabilei EPV_65 și compară valoarea cu PV_65, care nu ține cont de mortalitate.
Actualizează VPA de la vârsta de 65 de ani la VPA de la vârsta de 20 de ani, luând în considerare atât rata dobânzii de 3%, cât și supraviețuirea persoanei (20) până la vârsta de 65 de ani. Compară din nou EPV_20 cu PV_20.

Exercițiu interactiv practic

Încearcă acest exercițiu completând acest cod de exemplu.

# Survival probabilities of (65) up to age 100
kpx <- c(1, ___(px[(___):(___)]))

# EPV of pension at age 65
EPV_65 <- ___(___ * ___ * ___)
cbind(PV_65, EPV_65)

# EPV of pension at age 20
EPV_20 <- EPV_65 * (1.03 ^ - 45 * ___(px[(___):(___)]))
cbind(PV_20, EPV_20)

Editează și rulează codul