절단 기대수명 vs 완전 기대수명
여전히 1999년 벨기에 여성 생명표를 다루면서, Cynthia는 1999년 자료를 사용해 신생아와 18세 여성의 기대수명이 얼마였는지 궁금해합니다. 또한 생명보험수리 수업에서 다뤘던 완전 기대수명과 절단 기대수명 간 0.5의 차이를 실증적으로 확인할 수 있는지도 점검하려고 해요.
영상에서 살펴본 바와 같이, 절단 기대수명은 다음과 같이 계산할 수 있어요.
$$ E[K_x] = \sum_{k=1}^{\infty} {}_kp_x. $$
1년 생존확률 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(___, ___)]