Esperanza de vida curtata vs completa
Sigues trabajando con la tabla de vida de mujeres de Bélgica de 1999. Cynthia se pregunta cuál era la esperanza de vida para una recién nacida y para una mujer de 18 años, usando los datos de 1999. Además, quiere comprobar si puede verificar empíricamente la diferencia de 0,5 entre la esperanza de vida completa y la curtata de la que se habló en su clase de Matemática del Seguro de Vida.
Recuerda del vídeo que la esperanza de vida curtata se puede calcular como
$$ E[K_x] = \sum_{k=1}^{\infty} {}_kp_x. $$
Las probabilidades de supervivencia de un año px y la esperanza de vida completa ex ya están precargadas.
Este ejercicio forma parte del curso
Valoración de productos de seguros de vida en R
Instrucciones del ejercicio
- Calcula la esperanza de vida curtata de (0), una mujer recién nacida. Primero, define las probabilidades de supervivencia
kp0como el producto acumulado depx. Después, imprime la suma dekp0. - Repite para (18), una mujer de 18 años. Esta vez, toma el subconjunto de
pxdesde la edad 18 en adelante antes de calcular el producto acumulado. - Compáralo con las esperanzas de vida completas. Imprime en una sola línea el subconjunto de
excorrespondiente a las edades 0 y 18 usando un vector de longitud 2 dentro de corchetes.
Ejercicio interactivo práctico
Prueba este ejercicio y completa el código de muestra.
# 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(___, ___)]