Trabalho Relatório Final
Florêncio, Eliabe Rodrigues
2023-11-27
1 Introdução
Este relatório apresenta uma análise detalhada das despesas dos parlamentares no ano de 2017, com base nos dados disponíveis no banco de dados “Ano-2017”, um arquivo no formato xlsx. O objetivo desta análise é fornecer insights sobre os padrões de gastos dos parlamentares, identificando aqueles com as maiores e menores despesas, bem como os valores de ressarcimento mais altos.
A análise de tais dados é crucial para garantir a transparência e a responsabilidade no uso de fundos públicos. Ao identificar os parlamentares com as maiores despesas e os valores de ressarcimento mais altos, podemos entender melhor como os recursos estão sendo utilizados e identificar quaisquer padrões ou tendências que possam exigir uma investigação mais aprofundada.
Além disso, ao examinar os parlamentares com as menores despesas, podemos identificar práticas de economia de custos que podem ser adotadas por outros parlamentares. Isso pode ajudar a garantir que os fundos públicos sejam utilizados da maneira mais eficiente possível.
A presente análise é dividida em várias seções, cada uma focada em um
aspecto específico das despesas dos parlamentares. É esperado que as
informações e insights apresentados aqui sejam úteis para todos os
interessados na gestão de fundos públicos e numa melhor governança.
2 Material e Métodos
Como dito anteriormente, este estudo foi realizado utilizando o banco de dados “Ano-2017”, que contém informações detalhadas sobre parlamentares e suas despesas do ano de 2017. As análises foram realizadas utilizando a linguagem de programação R no ambiente de desenvolvimento Rstudio e foram utilizadas as bibliotecas readxl, ggplot2 e dplyr para a construção dos gráficos.
2.1 Variáveis Utilizadas
As variáveis utilizadas neste estudo incluem o nome do parlamentar (txNomeParlamentar), o valor do documento (vlrDocumento), o partido político (sgPartido) ao qual o parlamentar pertence, e o número de ressarcimento (numRessarcimento). Além disso, a variável nuLegislatura foi usada para dividir os gráficos em painéis separados para cada legislatura, permitindo uma comparação fácil entre diferentes legislaturas.
2.1.1 Variáveis utilizadas para analisar os Maiores Gastos Parlamentares:
• vlrDocumento
• txNomeParlamentar
•
sgPartido
• numAno
2.1.2 Variáveis utilizadas para analisar os Menores Gastos Parlamentares:
• vlrDocumento
• txNomeParlamentar
•
sgPartido
• numAno
2.1.3 Variáveis utilizadas para analisar o Maior valor de Ressarciamento:
• numRessarciamento
• txNomeParlamentar
•
sgPartido
• numAno
2.1.4 Variáveis utilizadas para gerar a tabela de relacionamento:
• numRessarciamento
• vlrGlosa
2.2 Métodos Utilizados
Os dados foram inicialmente carregados no ambiente R a partir de um arquivo Excel usando a função read_excel. Em seguida, os dados foram ordenados com base no valor do documento (vlrDocumento) para identificar os parlamentares com as maiores e menores despesas.
Para visualizar esses dados, foram criados gráficos de barras e tabelas usando a biblioteca ggplot2. Os gráficos mostram os parlamentares com as maiores e menores despesas, com as barras coloridas de acordo com o partido político (sgPartido) ao qual o parlamentar pertence. Além disso, os gráficos foram divididos em painéis separados para cada legislatura (nuLegislatura), permitindo uma comparação fácil entre diferentes legislaturas.
Além disso, foi realizada uma análise dos valores de ressarcimento (numRessarcimento), onde foram também usadas as bibliotecas knitr e kableExtra para gerar a tabela que é relacionada com o gráfico de que mostra o maior valor de Ressarciamento. Os parlamentares com os maiores valores de ressarcimento foram identificados e visualizados em um gráfico de barras, novamente colorido por partido político e dividido por ano (numAno).
3 Aplicações
Avisos referentes ao carregamento de pacotes e bibliotecas utilizadas:
##
## 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##
## Attaching package: 'kableExtra'## The following object is masked from 'package:dplyr':
##
## group_rows
4 Análise dos Dados
4.1 Gráfico dos Maiores Gastos Parlamentares de 2017
Logo abaixo temos o gráfico que apresenta os partidos e seus respectivos representantes que obtiveram os maiores gastos de 2017 registrados na planilha de dados ‘Ano-2017’ e suas despesas. Em destaque se encontra o Partido Avante representado pelo Deputado Givaldo Carimbão.
suppressWarnings({
dados_ordenados <- dados[order(-dados$vlrDocumento), ]
maiores_valores <- head(dados_ordenados)
ggplot(maiores_valores, aes(x=txNomeParlamentar, y=vlrDocumento, fill=sgPartido)) +
geom_bar(stat="identity") +
theme(axis.text.x = element_text(angle = 45, hjust = 1)) +
labs(x="Deputado", y="Valor do Documento", fill="Partido") +
ggtitle("Maiores valores de gastos por deputado")+
facet_wrap(~numAno)
})
4.2 Gráfico dos Menores Gastos Parlamentares de 2017
Ao contrário do gráfico apresentado acima, o gráfico abaixo está apresentando os menores gastos dos deputados do ano de 2017 de acordo com a planilha “Ano-2017”. Em comparação com o gráfico acima percebe-se que ambos possuem partidos em comum, o partido DEM e o partido do PT. Isso ocorre porque o conjunto de dados “Ano-2017” utilizado para gerá-los possui informações sobre todas as despesas dos parlamentares, e não apenas as maiores ou menores. Portanto, é possível que um parlamentar (ou partido) tenha tanto despesas altas quanto baixas.
suppressWarnings({
dados_ordenados <- dados[order(dados$vlrDocumento), ]
menores_valores <- head(dados_ordenados)
ggplot(menores_valores, aes(x=txNomeParlamentar, y=vlrDocumento, fill=sgPartido)) +
geom_bar(stat="identity") +
theme(axis.text.x = element_text(angle = 45, hjust = 1)) +
labs(x="Deputado", y="Valor do Documento", fill="Partido") +
ggtitle("Menores valores de gastos por deputado")+
facet_wrap(~numAno)
})
4.3 Gráfico do Maior Valor de Ressarciamento de 2017
O gráfico abaixo é um gráfico de barras empilhadas que apresenta o maior valor de ressarciamento de 2017 de acordo com a planilha “Ano-2017”. O motivo pelo qual não é vista nenhuma barra empilhada se da por conta de que a coluna numRessarciamento da planilha de dados possui apenas uma informação registrada, o parlamentar Silvio Costa do partido Avante. Porém este fato não prova que não exista possibilidades de se extrair insights de colunas vazias. Neste caso, a conclusão a se chegar é de que muitos dos parlamentares listados no conjunto de dados não solicitaram ou não receberam reembolso por suas despesas. Os motivos para isto podem variar.
suppressWarnings({
top_parlamentares <- dados %>%
arrange(desc(numRessarcimento)) %>%
head(10)
ggplot(top_parlamentares, aes(x = reorder(txNomeParlamentar, numRessarcimento), y = numRessarcimento, fill = sgPartido)) +
geom_bar(stat = "identity") +
coord_flip() +
facet_wrap(~numAno)+
labs(x = "Parlamentar", y = "Número de Ressarcimentos", fill = "Partido") +
theme_minimal() +
ggtitle("Parlamentares com o maior número de ressarcimentos")
})
A tabela abaixo com as colunas vlrGlosa e numRessarciamento podem nos ajudar a compreender que certos valores não foram reembolsados, ou seja, o pedido de reembolso foi negado. Note que algumas linhas da coluna vlrGlosa possuem algums valores, porém eles não foram ressarcidos. Veja:
4.4 Tabela de Relacionamento
dados_selecionados <- dados[1:50, c("vlrGlosa", "numRessarcimento")]
kable(dados_selecionados, "html") %>%
kable_styling(bootstrap_options = c("striped", "hover", "condensed", "responsive"))| vlrGlosa | numRessarcimento |
|---|---|
| 0.00 | NA |
| 201.92 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 4.50 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
| 0.00 | NA |
5 Conclusão
A análise das despesas dos parlamentares no ano de 2017, com base nos dados do banco de dados “Ano-2017”, revelou insights significativos sobre os padrões de gastos dos parlamentares. Através desta análise, fomos capazes de identificar os parlamentares com as maiores e menores despesas, bem como os valores de ressarcimento mais altos.
Descobrimos que muitos parlamentares listados no conjunto de dados não solicitaram ou não receberam reembolso por suas despesas. Isso foi evidenciado pela ausência de dados na coluna numRessarcimento. No entanto, a análise da coluna vlrGlosa revelou que alguns valores não foram reembolsados, indicando que o pedido de reembolso foi negado.
Esses achados destacam a importância da transparência e da responsabilidade no uso de fundos públicos. Ao identificar os parlamentares com as maiores despesas e os valores de ressarcimento mais altos, podemos entender melhor como os recursos estão sendo utilizados e identificar quaisquer padrões ou tendências que possam exigir uma investigação mais aprofundada.
Além disso, ao examinar os parlamentares com as menores despesas, podemos identificar práticas de economia de custos que podem ser adotadas por outros parlamentares. Isso pode ajudar a garantir que os fundos públicos sejam utilizados da maneira mais eficiente possível.
Em conclusão, a análise das despesas dos parlamentares oferece uma visão valiosa sobre o uso de fundos públicos. Esses insights podem informar políticas futuras e práticas de governança, contribuindo para um uso mais eficiente e responsável dos recursos públicos. Continuaremos a monitorar essas tendências e a fornecer atualizações conforme necessário. Espero que as informações e insights apresentados neste relatório sejam úteis para todos os interessados na gestão de fundos públicos e numa melhor governança.
6 Referências
Instituto Brasileiro de Geografia e Estatística (IBGE). (s.d.). Recuperado em [29/11/2023], de https://www.ibge.gov.br/
RStudio Desktop. (s.d.). Recuperado em [29/11/2023], de https://posit.co/download/rstudio-desktop/
Dados Abertos da Câmara dos Deputados. (s.d.). Recuperado em [29/11/2023], de https://dadosabertos.camara.leg.br/swagger/api.html#staticfile