Taxas de mortalidade ao longo do tempo

Cynthia baixou os dados de mortalidade mais recentes da Bélgica no Human Mortality Database (HMD). Esse conjunto de dados já está carregado como life_table.

Neste exercício, você vai usar duas funções comuns do R. with() (docs) permite avaliar uma expressão R em um ambiente local construído a partir de um data frame. Isso evita ter que digitar life_table$ repetidamente para extrair colunas. Por exemplo, as taxas de mortalidade em log de pessoas de 18 anos ao longo dos anos podem ser extraídas usando:

with(life_table, log(qx[age == 18]))

with() é especialmente útil em combinação com subset() (docs). Por exemplo, a taxa de mortalidade em log de pessoas de 18 anos da tábua de vida do ano de 1999 pode ser obtida usando:

with(subset(life_table, year == 1999), log(qx[age == 18]))

Este exercicio faz parte do curso

Avaliação de Produtos de Seguro de Vida em R

Ver curso

Instruções do exercicio

Explore life_table. Imprima as primeiras 6 linhas usando head() e calcule o range() (docs) da variável year.
Complete o código usando subset() corretamente em life_table para que as taxas de mortalidade de mulheres de 18 anos ao longo dos anos sejam plotadas.
Novamente, use subset() para selecionar a tábua de vida de 1950 e plote a curva de taxa de mortalidade desse ano.

exercicio interativo prático

Tente este exercicio completando este código de exemplo.

# Explore life_table
___
___

# Plot the logarithm of the female mortality rates for (18) by year
with(___(___, ___), 
     plot(year, log(qx), 
          type = "l", main = "Log mortality rates (Belgium, females, 18-year-old)", 
          xlab = "Year t", ylab = expression(paste("Log mortality rate ", log(q[18])))))

# Plot the logarithm of the female mortality rates in the year 1950 by age
with(___(___, ___), 
     plot(age, log(qx), 
          type = "l", main = "Log mortality rates (Belgium, females, 1950)",
          xlab = "Age x", ylab = expression(paste("Log mortality rate ", log(q[x])))))

Editar e Executar Código