Od jednorázového k ročnímu pojistnému

Paní Cathleen chce financovat svou odloženou doživotní rentu ročními pojistnými, která bude platit 25 let počínaje věkem 40 let. Protože ale od 55 let plánuje omezit svůj pracovní úvazek, pojistné se po 15 letech sníží na polovinu, jak je znázorněno v grafu níže. Jaká bude výše počátečního pojistného, které paní Cathleen zaplatí?

Proměnné kpx, discount_factors a single_premium vypočítané v předchozím cvičení jsou předem načteny.

Toto cvičení je součástí kurzu

Oceňování produktů životního pojištění v R

Zobrazit kurz

Pokyny k cvičení

Definuj vzor pojistného jako rho. Tento vektor by měl mít stejnou délku jako kpx.
Vypočítej a vypiš initial_premium tak, že vydělíš single_premium součtem prvkového součinu vektorů rho, discount_factors a kpx.
Prozkoumej roční pojistná tak, že vypíšeš součin initial_premium a rho.
Bez zohlednění časové hodnoty peněz a mortality vypočítej celkovou částku, kterou paní Cathleen zaplatí na financování doživotní renty.

Interaktivní cvičení na vyzkoušení si v praxi

Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.

# Premium pattern rho
rho <- c(rep(1, ___), rep(0.5, ___), rep(0, ___))

# The initial premium
initial_premium <- ___ / ___(___ * ___ * ___)
initial_premium

# The annual premiums 
___ * ___

# Sum of the annual premiums (no actuarial discounting)
___(___ * ___)

Upravit a spustit kód