Introdução

Para o trabalho de hoje, eu irei analisar a base de dados BasesMunicipios, nela, podemos encontrar informações como: Espectativa de vida, IDH Renda, Taxa de analfabetismo e muitas outras sobre os municípios do Rio de Janeiro.

Passo 1

Iniciarei essa análise carregando a Base de Dados e visualizando as suas informações

library(readxl)
BasesMunicipios <- read_excel("C:/Users/noeli/Base_de_dados-master/BasesMunicipios.xlsx")
View(BasesMunicipios)

Passo 2

Após carregar a Base de dados, eu vou baixar alguns pacotes e adicionar os códigos para me auxiliar na montagem das imagens dos municípios

library(geobr)
## Loading required namespace: sf
desenho_rio_municipio = read_municipality(code_muni = "RJ", showProgress = FALSE)
## Using year 2010
plot(desenho_rio_municipio)

class(BasesMunicipios)
## [1] "tbl_df"     "tbl"        "data.frame"
class(desenho_rio_municipio)
## [1] "sf"         "data.frame"
class(BasesMunicipios$`COD IBGE2`)
## [1] "character"
class(desenho_rio_municipio$code_muni)
## [1] "numeric"
BasesMunicipios$`COD IBGE2` =  as.numeric(BasesMunicipios$`COD IBGE2`)
library(dplyr)
## 
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
## 
##     filter, lag
## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union
BasesMunicipios = BasesMunicipios %>% rename(code_muni=`COD IBGE2`)
mapa_esperancadevida= desenho_rio_municipio %>% left_join(BasesMunicipios)
## Joining with `by = join_by(code_muni)`

Passo 4

Agora irei adicionar mais um gráfico com a imagem feito com a imagem do rio de janeiro, nele iremos analisar a esperança de vida média de cada município do Estado

library(ggplot2)
ggplot() +
  geom_sf(data=mapa_esperancadevida, aes(fill=Esperancadevida))

#Considerações Finais

Após analisar o gráfico sobre a Expectativa de vida dos municípios do Rio de Janeiro, podemos chegar a algumas considerações: O município com a maior expextativa de vida é o Rio das Ostras, sua média é de 76 anos. Em comparação, o com a menor expextativa de vida é o município do norte fluminense: Cardoso Moreira, com uma idade máxima média de 71 anos.

O gráfico também mostra que os municípios com as menores expextativas de vida estão em sua grande maioria nas regiões norte, noroeste e serrana do Estado. Também é interessante ressaltar que as regiões com maiores taxas de expectativa de vida estão perto do litoral, onde a qualidade de vida num geral e a renda (IDH) são maiores.