整歲期望餘命 vs 完整期望餘命
延續使用比利時 1999 年女性的生命表,Cynthia 想知道以 1999 年的資料計算,新生兒與 18 歲女性各自的期望餘命是多少。此外,她也想驗證在她的壽險數學課上提到的「完整期望餘命與整歲期望餘命相差 0.5」是否能用經驗方式確認。
回想影片中的說明,整歲期望餘命可計算為:
$$ E[K_x] = \sum_{k=1}^{\infty} {}_kp_x. $$
一年期的存活機率 px 與完整期望餘命 ex 已經預先載入。
本練習屬於課程
以 R 估值人壽保險商品
練習說明
- 計算(0),也就是新生兒女性的整歲期望餘命。先將存活機率
kp0定義為px的累乘積,然後印出kp0的總和。 - 針對(18),也就是 18 歲女性,重複上述步驟。這次在計算累乘積前,先從 18 歲起擷取
px的子集合。 - 與完整期望餘命比較。用一行程式碼,透過長度為 2 的向量放在中括號內,印出年齡 0 與 18 對應的
ex子集合。
動手互動練習
試著完成這個範例程式碼,體驗一下這個練習。
# Survival probabilities and curtate expected future lifetime of (0)
kp0 <- ___
___
# Survival probabilities and curtate expected future lifetime of (18)
kp18 <- ___(px[(___):___])
___
# Complete expected future lifetime of (0) and (18)
___[c(___, ___)]