Análise de Óbitos

VADeaths

Abaixo está a visualização do dataset VADeaths, que mostra as taxas de mortalidade na Virgínia em 1940, divididas por faixas etárias e grupos populacionais.

data("VADeaths")


cores <- c("darkblue", "darkred", "darkgreen", "darkorange", "purple")


barplot(
  VADeaths,
  beside = TRUE,             
  col = cores,              
  main = "Taxas de Mortalidade na Virgínia (1940)", 
  xlab = "Grupos Populacionais",                   
  ylab = "Taxa de Mortalidade (por 1000 hab.)",    
  legend.text = rownames(VADeaths),                 
  args.legend = list(x = "topleft", bty = "n")      
)