Horyzont krótko- i długoterminowy

Sprawdź, co dzieje się z wartością bieżącą gwarantowanej płatności oraz czystej endowacji w wysokości 10 000 EUR, gdy zmienisz horyzont czasowy z 5 na 10 lub 30 lat. Stopa procentowa wynosi nadal stałe \(2\%\), a prawdopodobieństwa przeżycia px zostały wcześniej wczytane.

To ćwiczenie jest częścią kursu

Wycena produktów ubezpieczeń na życie w R

Zobacz kurs

Instrukcje do ćwiczenia

Przypisz wartości bieżące (PV) gwarantowanych płatności w wysokości 10 000 EUR za 5, 10 i 30 lat do zmiennej PV. Użyj wektoryzacji.
Oblicz prawdopodobieństwa przeżycia kpx dla osoby w wieku (20) lat, stosując cumprod() na podzbiorze px zaczynającym się od 20 + 1 aż do length(px).
Użyj kpx w momentach c(5, 10, 30), aby przekształcić PV gwarantowanych płatności na oczekiwaną wartość bieżącą (EPV) odpowiadających im czystych endowacji.

Interaktywne ćwiczenie praktyczne

Spróbuj tego ćwiczenia, uzupełniając ten przykładowy kod.

# 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(___)]

Edytuj i uruchom kod