Cât de probabil este ca Cynthia să trăiască până la 100 de ani?

Pasionată de statistică în R, Cynthia s-a bucurat de primele sale explorări ale tabelului de mortalitate pentru anul 1999. Acum vrea să aprofundeze analiza folosind R. Cynthia este în mod special interesată de probabilitatea de a deveni centenară. Care este această probabilitate pentru o persoană de zero ani, pe baza datelor din 1999? Dar pentru una de 18 ani? Poți determina cum se calculează aceste probabilități? Realizează apoi o vizualizare a \((k,\ _kp_{18})\).

În exercițiile următoare, tabelul de mortalitate periodic pentru femei din Belgia, aferent anului 1999, este preîncărcat și stocat în obiectul life_table, iar coloana lx a fost extrasă pentru tine.

Acest exercițiu face parte din cursul

Evaluarea produselor de asigurare de viață în R

Vezi cursul

Instrucțiuni pentru exercițiu

Folosește lx pentru a calcula probabilitatea ca o persoană de zero ani să devină centenară (adică să atingă vârsta de 100 de ani). Asigură-te că extragi valorile prin index.
Calculează aceeași probabilitate pentru o persoană de 18 ani.
Calculează și reprezintă grafic probabilitățile ca o persoană de 18 ani să supraviețuiască până la vârstele 18, 19, … și până la 100. Definește k ca un vector de la 0 la 82. Folosește k pentru a calcula probabilitățile.

Exercițiu interactiv practic

Încearcă acest exercițiu completând acest cod de exemplu.

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

Editează și rulează codul