A Seguir a Análise da variavel Qualitativa das pessoas que moram com os pais, referente ao questionário de nivel de Stress.

Fase 1 - Importação de Banco de Dados

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


View(Questionario_Estresse)

Fase 2 - Manipulação de Banco de Dados

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

Fase 3 - Construção das Estastisticas

tabela_Mora_pais <- table(Questionario_Estresse$Mora_pais) #Absoluta


prop.table(tabela_Mora_pais)*100 #Relativa
## 
##        1        2 
## 46.31579 53.68421
pie (tabela_Mora_pais, col = c("#47735b", "#7498b5"), main = "Gráfico 01")

barplot(tabela_Mora_pais, col = c("#47735b", "#7498b5"), main = "Gráfico 02", ylim = c(0,60))