Gráfico de barras - Trabalho

Foi realizada uma análise das respostas à pergunta “Trabalha?”, onde foi possível observar que a maioria dos alunos não trabalha (62,1%), o que facilita a obtenção de bons desempenhos.

As etapas que constituíram a análise foram:

1 - Carregar a base de dados; 2 - Manipular os dados; 3 - Visualizar o gráfico de barras; 4 - Criar tabelas; e 5 - Conclusões sobre o gráfico.

library(readxl)
Questionario_Estresse <- read_excel("C:/Users/Alex/Desktop/Questionario_Estresse.xls")

Questionario_Estresse$Trabalha = as.factor(Questionario_Estresse$Trabalha)

Questionario_Estresse$Trabalha = ifelse(Questionario_Estresse$Trabalha=="1","Sim","Não")

barplot(table(Questionario_Estresse$Trabalha),
        col = c("pink","gray"),
        vert = TRUE,
        ylim = c(0,60),
        main = "Trabalha?")

table(Questionario_Estresse$Trabalha)
## 
## Não Sim 
##  59  36
prop.table(table(Questionario_Estresse$Trabalha))*100
## 
##      Não      Sim 
## 62.10526 37.89474

Análise de variável quantitativa

Histograma - Empenho

Foi elaborado um histograma para analisar o empenho dos alunos. Pelo formato do histograma é possível concluir que a distribuição é assimétrica, com as seguintes informações:

Média: 8.59; Mediana: 8.70; Moda: 8.50 (no gráfico a moda concentra-se no intervalo entre 8.50 a 9.00); Menor nota: 5.82; e Maior nota: 9.70

par(mfrow=c(1,1))
hist(Questionario_Estresse$Desempenho,col="skyblue")

summary(Questionario_Estresse$Desempenho)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   5.820   8.500   8.700   8.594   9.050   9.700

Box-Plot - Desempenho, Estresse e Horas de estudo

Considerações: a) Variância do Desempenho é pequena; b) Variância do Estresse é grande; c) Variância das horas de estudo é razoável; d) As variável Desempenho e Estresse são assimétricas e a variável horas de estudo é simétrica; e) A variância Horas de Estudo tem outliers; e f) A maioria dos alunos estão com a nota acima da média da turma.

par(mfrow=c(1,3))
boxplot(Questionario_Estresse$Desempenho,col="red",main="boxplot 1 - Desempenho")
boxplot(Questionario_Estresse$Estresse,col="skyblue",main="boxplot 2 - Estresse")
boxplot(Questionario_Estresse$Horas_estudo,col="white",main="boxplot 3 - Horas Estudo")

Conclusão do relatório

Por meio da análise da base de dados Questionario_Estresse, conclui-se que: a) A maioria dos alunos não trabalha, conforme dito anterior, isso facilita a obtenção de bons desempenhos; b) A maioria dos alunos possui bom desempenho; c) Foi observada a existência de sete outliers na variável desempenho, o que significa que apenas 7 alunos não possuem notas próximas à média da turma; e
d) Foi observada a existência de dois outliers na variável horas de estudo, o que significa que dois alunos estudam muito mais que os demais.