Hur stor är sannolikheten att Cynthia lever till 100?

Som en hängiven R-entusiast uppskattade Cynthia sin första genomgång av livstabellen för år 1999. Nu vill hon fördjupa sin analys med hjälp av R. Cynthia är särskilt intresserad av sannolikheten att bli hundraåring. Hur stor är den sannolikheten för en nollåring, baserat på 1999 års data? Och för en 18-åring? Kan du räkna ut hur man beräknar dessa sannolikheter? Gör sedan en visualisering av \((k,\ _kp_{18})\).

I följande övningar är periodlivstabellen för 1999 för kvinnor i Belgien förinläst och lagrad i objektet life_table, och kolumnen lx har extraherats åt dig.

Den här övningen är en del av kursen

Värdering av livförsäkringsprodukter i R

Visa kurs

Övningsinstruktioner

Använd lx för att beräkna sannolikheten att en nollåring lever till 100 år (dvs. når 100 års ålder). Se till att du extraherar med index.
Beräkna samma sannolikhet för en 18-åring.
Beräkna och plotta sannolikheterna för att en 18-åring överlever till åldrarna 18, 19, … upp till 100. Definiera k som en vektor från 0 till 82. Använd k för att beräkna sannolikheterna.

Interaktiv övning med praktiskt arbete

Testa den här övningen genom att slutföra den här exempelkoden.

# 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)")

Redigera och kör kod