Kort och lång tidshorisont

Låt oss undersöka vad som händer med nuvärdet av den garanterade betalningen och den rena endowmenten på 10 000 EUR när du ändrar tidshorisonten från 5 till 10 eller 30 år. Räntan är fortfarande konstant på \(2\%\) och överlevnadssannolikheterna px har förinslästs.

Den här övningen är en del av kursen

Värdering av livförsäkringsprodukter i R

Visa kurs

Övningsinstruktioner

Tilldela nuvärdet (PV) av garanterade betalningar på 10 000 EUR om 5, 10 respektive 30 år till PV. Använd vektorisering.
Beräkna överlevnadssannolikheterna kpx för (20) med hjälp av cumprod() på delmängden av px med start från 20 + 1 till length(px).
Använd kpx vid tidpunkterna c(5, 10, 30) för att omvandla PV för de garanterade betalningarna till EPV för motsvarande rena endowments.

Interaktiv övning med praktiskt arbete

Testa den här övningen genom att slutföra den här exempelkoden.

# PV of guaranteed payments of 10,000 in 5, 10 and 30 years
PV <- ___ * (___) ^ - c(___)
PV

# Survival probabilities of (20)
kpx <- ___(px[(___):___])

# EPV of pure endowments of 10,000 in 5, 10 and 30 years for (20)
___ * ___[c(___)]

Redigera och kör kod