Un plan de pensionare pentru doamna Cathleen

Ca ultimă sarcină din stagiul său de vară, Cynthia este rugată să facă niște calcule pentru doamna Cathleen. Doamna Cathleen este profesoară, are 40 de ani și își planifică pensionarea. Vrea să cumpere o rentă care să îi ofere 18.000 EUR anual pe tot parcursul vieții, începând de la vârsta de 65 de ani. În caz de deces înainte de 65 de ani, nu se plătește nimic. Figura de mai jos ilustrează planul de pensionare al doamnei Cathleen.

Probabilitățile de supraviețuire pe un an px sunt preîncărcate.

Acest exercițiu face parte din cursul

Evaluarea produselor de asigurare de viață în R

Vezi cursul

Instrucțiuni pentru exercițiu

Definește kpx pentru o femeie în vârstă de 40 de ani.
Creează discount_factors, care actualizează plățile la momentul zero (vârsta 40) până la momentul length(kpx) - 1, la o rată de 3%.
Atribuie plățile de pensie variabilei benefits. Asigură-te că acest vector are aceeași lungime ca kpx.
Calculează single_premium ca suma produsului element cu element dintre benefits, discount_factors și kpx. Afișează rezultatul.

Exercițiu interactiv practic

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

# Survival probabilities of (40)
kpx <- c(___, ___(px[(___):___])) 

# Discount factors (to age 40)
discount_factors <- (1 + ___) ^ -(0:(___))

# Pension benefits
benefits <- c(rep(___, ___), rep(___, length(kpx) - 25))

# The single premium
single_premium <- ___
single_premium

Editează și rulează codul