Cynthia 活到 100 歲的機率有多高?
身為 R 統計愛好者,Cynthia 很享受她對 1999 年生命表的首次探索。她想用 R 再多挖掘一些洞見。Cynthia 特別關心成為百歲人瑞的機率。以 1999 年的資料來看,0 歲個體的這個機率是多少?18 歲個體呢?你能想出如何計算這些機率嗎?接著視覺化 $(k,\ _kp_{18})$。
在下列練習中,比利時女性 1999 年的期間生命表已預先載入到物件 life_table,而且已為你抽取好 lx 欄。
本練習屬於課程
以 R 估值人壽保險商品
練習說明
- 使用
lx計算 0 歲個體成為百歲人瑞(亦即達到 100 歲)的機率。請務必用索引方式取值。 - 以相同方式計算 18 歲個體的機率。
- 計算並繪製 18 歲個體存活至 18、19、…、一直到 100 歲的機率。將
k定義為 0 到 82 的向量。使用k來計算這些機率。
動手互動練習
試著完成這個範例程式碼,體驗一下這個練習。
# Compute the probabilty for (0) to reach the age 100
___
# Compute the probabilty for (18) to reach the age 100
___
# Plot the survival probabilties for (18) up to age 100
k <- ___
plot(k, ___,
pch = 20,
xlab = "k",
ylab = expression(paste(""[k], "p"[18])),
main = "Survival probabilities for (18)")