Fase 1 - Importar base dados Excel

library(readxl)
Questionario_Estresse <- read_excel("C:/Users/victo/Desktop/Base_de_dados-master/Questionario_Estresse.xls")
View(Questionario_Estresse)

A variável escolhida é Horas de Estudo

Fase 2 - Construção histograma - Assimétrico à direita

hist(Questionario_Estresse$Horas_estudo, col = "#82d192",
     main = "Gráfico 1 - Histograma de Horas de Estudo",
     xlim = c(10,60),
     ylim = c(0,40),
     xlab = "Horas de Estudo",
     ylab = "Quantidade de Alunos")

Fase 3 - Construção do Boxplot

boxplot(Questionario_Estresse$Horas_estudo, col = "#e3a1e3",
        main = "Gráfico 2 - Boxplot de Horas de Estudo ")

Fase 4 - Medidas de Posição

#média
mean(Questionario_Estresse$Horas_estudo)
## [1] 30.72632
#moda = 25

#mediana
median(Questionario_Estresse$Horas_estudo)
## [1] 30
#primeiro quartil e terceiro quartil
summary(Questionario_Estresse$Horas_estudo)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   19.00   25.00   30.00   30.73   35.00   60.00

Fase 5 - Interpretação de Gráficos e Tabelas

Pode-se verificar através da análise da variável quantitativa “Horas_estudo”:
O histograma construído Horas de estudo X Quantidade de Alunos apresentou assimetria à direita, uma vez que concentrou-se na esquerda. O intervalo de 25 a 30 horas de estudo possui a maior frequência de adesão dos estudantes de acordo com o histograma. Com o histograma foi possível observar que o intervalo de 45 a 55 horas de estudo não possui adesão dos alunos. Através do boxplot, é possível perceber a presença de dois outliers, 59 e 60, que destoam dos demais dados. Pelo posicionamento das medidas de posição apresentadas no boxplot, pode-se inferir que a assimetria é leve. E, pela análise das medidas de posição, tem-se que a média (30.73) e a mediana (30) próximas, mas não iguais. Isso confirma leve assimetria. A moda apresentada é 25, aparecendo 9 vezes.O primeiro quartil é 25 e o terceiro quartil é 35. Além disso, o mínimo é 19 e o máximo 60.