Resumo:

Este trabalho trata da análise de uma variável qualitativa presente na Base de Dados denominada Questionário_Estresse, referente a uma pesquisa sobre o grau de estresse de duas turmas do curso de psicologia. A variável escolhida para esse relatório foi: Trabalha. A partir daí, foi possível traçar um panorama estatístico sobre a ocupação dos estudantes, ou seja, se exercem ou não alguma atividade profissional durante o perído de graduação. Através da análise dessa variável e como está descrito nos gráficos e na tabela, notou-se que, das 95 pessoas analisadas, 36 trabalham e 59 não trabalham, concluindo-se que menos de 40% das pessoas trabalham e pouco mais de 60% dos indivíduos não trabalham. Portanto, é provável que os alunos que exercem alguma atividade profissional concomitantemente com os estudos, estejam mais propensos a episódios de estresse ao longo do tempo.

#Fase 1 - Importar os bancos de dados

#carregar do excel

library(readxl)
Questionario_Estresse <- read_excel("C:/Users/User/Desktop/Base_de_dados-master/Questionario_Estresse.xls", 
                                    sheet = "Dados")
View(Questionario_Estresse)

Fase 2 - Manipular o banco de dados

summary(Questionario_Estresse$Trabalha)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   1.000   1.000   2.000   1.621   2.000   2.000

Fase 3 - Construção das estatísticas

tabela_trabalha <- table(Questionario_Estresse$Trabalha)

tabela_trabalha # Abs
## 
##  1  2 
## 36 59
prop.table(tabela_trabalha)*100 # Rel
## 
##        1        2 
## 37.89474 62.10526
pie(tabela_trabalha,col = c("blue","brown"), main = "Gráfico de pizza da Variável Qualitativa")

barplot(tabela_trabalha,,col = c("blue","brown"), main = "Gráfico de barras da Variável Qualitativa",ylim = c(0,100))