忽略死亡率的养老金计算
Cynthia 的主管希望她更加重视货币的时间价值,并学会在退休计算中使用生存概率。他让 Cynthia 针对自己的情况(比利时女性,20 岁)分别在考虑和不考虑死亡率的前提下,做一些养老金计算。
Cynthia 设计了一个情景:她的未来雇主从 65 岁起向她支付养老金,持续到 100 岁。在该情景下,首笔年度养老金为 20,000 欧元,此后每年增长 2%(用于抵消通货膨胀)。假设未来 45 年利率为 3%,之后为 4%。
当不考虑死亡率时,养老金的现值是多少?也就是说,您可以假设从 65 岁到 100 岁的 36 笔给付都得到保证。
本练习是课程的一部分
用 R 评估人寿保险产品
练习说明
- 创建
benefits,包含从 65 岁开始的 36 笔养老金给付,起始金额为 20,000,并且每年增加 2%。 - 定义
discount_factors,以 4% 的利率将这些给付折现到 65 岁。 - 计算这些养老金给付在 65 岁时的价值,将结果赋给
PV_65。 - 将
PV_65以 3% 的利率在 45 年期间折现,得到 20 岁时的现值PV_20。
交互式实操练习
通过完成这段示例代码来试试这个练习。
# Pension benefits
benefits <- ___ * ___ ^ (___)
# Discount factors (to age 65)
discount_factors <- ___ ^ - (___)
# PV of pension at age 65
PV_65 <- ___(___ * ___)
PV_65
# PV of pension at age 20
PV_20 <- ___ * ___ ^ - ___
PV_20