Relatório sobre o Rio Grande do Sul para Ciência de Dados

3 Métodos e materiais

3.1 Dados

Os dados utilizados neste relatório foram tirados do site do IBGE sobre o estado do Rio Grande do Sul, abrangendo todas os municípios, baixados em xlsx, retirando antes traços e vírgulas, e também colunas que não seriam utilizadas para a finalidade deste relatório.

3.2 Variáveis

pegaxlsx: Variável para guardar o nome do arquivo em xlsv;

Dadoslidos: Variável para guardar os dados lidos por uma determinada função;

dados: Variável que armazena o dataframe;

medias67: Variável que armazena a média das colunas 6 e 7 de todos os municípios;

alegre_linha: Variável que guarda a linha do município de Porto Alegre;

alegre_coluna: Variável que guarda as colunas 6 e 7 do município de Porto Alegre;

porto_alegre: Variável que armazena os dados da coluna 6 e 7 da capital Porto Alegre;

rankingescol: Variável que armazena os 20 municípios líderes em escolarização, usando a ordem decrescente;

rankingIDHM: Variável que armazena os 20 municípios líderes em IDHM, usando a ordem decrescente.

3.3 Bibliotecas

library(readxl)
library(ggplot2)
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

4 Resultados

Vemos aqui, que a capital Porto Alegre possue uma taxa de escolarização abaixo da média, simultaneamente também vemos que tal capital possue um IDHM acima da média do estado do Rio de Janeiro:

pegaxlsx <- "RS.xlsx"
Dadoslidos <- read_excel(pegaxlsx, sheet = 1)
dados <- as.data.frame(Dadoslidos)
dados[, c(5:9)] <- lapply(dados[, c(5:9)], as.numeric)

medias67 <- colMeans(dados[, c(6, 7)], na.rm = TRUE)
print(medias67)

## Escolarização          IDHM 
##      97.95122     643.92705

alegre_linha <- 323
alegre_coluna <- 6:7
porto_alegre <- dados[alegre_linha, alegre_coluna]
print(porto_alegre)

##     Escolarização IDHM
## 323          96.6  805

Como podemos ver no próximo gráfico, Porto Alegre possue uma taxa de escolaridade abaixo de muitas outras taxas de outros municípios.

dados <- dados[order(dados$Escolarização, decreasing = TRUE),]
dados <- dados[order(dados$IDHM, decreasing = TRUE),]

rankingescol <- head(dados, 20)
rankingIDHM <- head(dados, 20)

ggplot(rankingescol, aes(x=Município,y=Escolarização))+
  geom_bar(stat = "identity", fill="blue")+
  theme(axis.text.x = element_text(angle = 40, hjust = 1))+
  labs(title = "Taxa de escolarização", x=dados$Município,y=dados$Escolarização)

Paralelamente, podemos ver no próximo gráfico que Porto Alegre possue um IDHM acima de todos os outros IDHMs, sendo o maior entre os 20 mais altos.

ggplot(rankingIDHM, aes(x=Município,y=IDHM))+
  geom_bar(stat = "identity", fill="red")+
  theme(axis.text.x = element_text(angle = 40, hjust = 1))+
  labs(title = "Taxa de IDHM", x=dados$Município,y=dados$IDHM)

5 Conclusões finais

A capital Porto Alegre do estado do Rio Grande do Sul não lidera o ranking da taxa de escolarização do estado, tendo em vista que está abaixo da média. No entanto a capital Porto Alegre não só está bastante acima da média quando se trata de IDHM, mas isso lidera este ranking.

6 Referências

IBGE, disponível em: https://cidades.ibge.gov.br/brasil/rs/panorama. Acesso em 29 de nov. de 2023.

IBGE, disponível em: https://www.ibge.gov.br/cidades-e-estados/rs.html. Acesso em 29 de nov. de 2023.

Relatório sobre o Rio Grande do Sul para Ciência de Dados

Gustavo Borges Martins

2023-11-29

1 Introdução

2 Objetivos

2.1 Objetivos gerais

2.2 Objetivos específicos