R Markdown
Introdução
Atividade 5 - duas variáveis quantitativas
Este relatório é sobre a base de dados
“Escola_Oliveira_p_Livro_DMQ.csv”, será analisado a correlação entre o
desempenho e os salários dos indivíduos contabilizados na base de
dados.
Importar a base de dados
library(readxl)
library(flextable)
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
Escola <- read_excel("Base_de_dados-master/Escola_Oliveira_p_Livro_DMQ.xlsx")
head(Escola) %>% data.frame() %>% flextable() %>% theme_zebra()
id | grau_pagamento | sexo | raca | casado | idade | anos_trabalho | desempenho | salario |
1 | 1 | 1 | 1 | 0 |
| 0.5 | 2 | 890 |
2 | 1 | 1 | 0 | 0 | 25 | 2.4 | 3 | 1,100 |
3 | 2 | 1 | 0 | 0 | 23 | 3.6 | 7 | 1,070 |
4 | 1 | 0 | 1 | 0 | 26 | 1.9 | 3 | 1,190 |
5 | 2 | 1 | 0 | 1 | 22 | 3.4 | 6 | 1,290 |
6 | 1 | 1 | 1 | 1 | 23 | 2.8 | 4 | 1,010 |
O salário realmente aumenta de acordo com o desempenho?
Variável resposta: salario
Variáveis explicativas: desempenho
Gráfico
Diagrama de dispersão
plot(Escola$salario,Escola$desempenho,pch=19,col="Purple",
main="Diagrama de dispersão",
xlab = "Salário",
ylab = "Desempenho")
abline(lsfit(Escola$salario,Escola$desempenho),col="Darkgreen",lwd=3)

valor próximo de -1 FORTE e NEGATIVA
valor próximo de 1 FORTE e POSITIVO
valor próximo de 0 CORRELAÇÃO NULA
cor(Escola$salario,Escola$desempenho)
## [1] 0.8346379
Correlação positiva e forte
Quanto maior o desempenho, maior o salário
Gráfico
Matriz de Correlação
selecao = c("salario","desempenho")
library(corrplot)
## corrplot 0.92 loaded
Escola %>% select(selecao) %>%
cor() %>% corrplot

Conclusão
Ao correlacionar as variáveis quantitativas “desempenho” e “salário”
foi possível analisar se ambas as colunas estão, de fato, relacionadas,
isso é, se uma informação influencia a outra e de que maneira, positiva
ou negativamente. Nessa análise, levantou-se a questão: o salário
aumenta de acordo com o desempenho do indivíduo? Seria um cenário
“ideal” no sentido que o esforço do trabalhador estaria sendo
recompensado com uma melhor remuneração.
Para responder à questão, foi feito um diagrama de dispersão onde,
de forma visual, é possível assimilar as duas variáveis relacionadas.
Assim, foi possível identificar, sim, uma correlação, já que as
informações se alinharam diagonalmente. Além disso, com a linha auxiliar
no gráfico e o resultado da fórmula de correlação, que nesse caso foi
0,8, nos informam que essa correlação é positiva e forte, ou seja,
quanto maior o desempenho, maior, de fato, o salário.
Foi feito também uma matriz de correlação, como uma outra forma de
visualizar essa relação entre as colunas da base de dados
“Escola_Oliveira_p_Livro_DMQ”. Nele, podemos ver o valor de correlação
de forma dinâmica, e a relação dessas colunas de forma mais visual.
Apesar de parecer um “cenário ideal”, já que o esforço do
trabalhador estaria sendo recompensado com uma melhor remuneração, pode
se tornar uma ferramenta de dominação e alienação do trabalhador, além
de geral competição, talvez exacerbada, entre os colegas. Esses dados
são muito para uma pesquisa sobre o assunto, poderiam ser relacionadas
com outros aspectos do trabalho assalariado como níveis de estresse,
horas de trabalho, cargos, entre outros, para melhor compreensão desse
universo.