由單筆保費到年繳保費
Cathleen 小姐想用年繳保費來支付其遞延養老年金，自 40 歲起繳 25 年。不過她打算從 55 歲起減少教學時數，因此 15 年後保費應減半，如下圖所示。請問她一開始需要支付的初始保費是多少？
前一個練習中計算的變數 kpx、discount_factors 和 single_premium 已預先載入。
本練習屬於課程
以 R 估值人壽保險商品
練習說明
- 將保費型態定義為
rho。這個向量長度應與kpx相同。 - 透過把
single_premium除以rho、discount_factors與kpx的對應元素相乘後的總和，計算並列印initial_premium。 - 列印
initial_premium與rho的乘積，檢視每年的應繳保費。 - 在不考慮時間價值與死亡率的情況下，計算 Cathleen 小姐為籌措此養老年金需要支付的總金額。
動手互動練習
試著完成這個範例程式碼，體驗一下這個練習。
# 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)
___(___ * ___)