短期与长期
当您把时间跨度从 5 年改为 10 年或 30 年时,来看看 10,000 EUR 的保证给付与纯存活保险的现值会发生什么变化。利率仍然恒定为 $2\%$,生存概率 px 已预加载。
本练习是课程的一部分
用 R 评估人寿保险产品
练习说明
- 将从现在起 5、10、30 年后 10,000 EUR 的保证给付现值赋给
PV。使用向量化。 - 计算 (20) 的生存概率
kpx:对从20 + 1到length(px)的px子集使用cumprod()。 - 取
kpx在c(5, 10, 30)时刻的值,将保证给付的PV转换为相应纯存活保险的 EPV。
交互式实操练习
通过完成这段示例代码来试试这个练习。
# 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(___)]