FASE 1 - Importar banco de dados de Questionário_Estresse

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

FASE 2 - Manipular a variável categórica escolhida: “RJ”

summary(Questionario_Estresse$RJ)
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   1.000   1.000   2.000   1.653   2.000   2.000
class(Questionario_Estresse$RJ)
## [1] "numeric"
# É uma variável qualitativa nominal, por isso deve-se transformá-la para factor
Questionario_Estresse$RJ <- as.factor(Questionario_Estresse$RJ)
class(Questionario_Estresse$RJ)
## [1] "factor"
#Nova variável de interpretação
Questionario_Estresse$Naturalidade <- ifelse(Questionario_Estresse$RJ==1, "RiodeJaneiro", "OutrasCidades")
Questionario_Estresse$Naturalidade <- as.factor(Questionario_Estresse$Naturalidade)
class(Questionario_Estresse$Naturalidade)
## [1] "factor"

FASE 3 - Construção de Estatísticas

#tabela de números absolutos da variável
tabela_naturalidade <- table(Questionario_Estresse$Naturalidade)
tabela_naturalidade
## 
## OutrasCidades  RiodeJaneiro 
##            62            33
#isso corresponde (%)
prop.table(tabela_naturalidade)*100
## 
## OutrasCidades  RiodeJaneiro 
##      65.26316      34.73684
#gráfico de barras
barplot(tabela_naturalidade, col = c("#4ce09b","#eb8552"), main = "Gráfico 1 - Gráfico de Barras de Naturalidade dos Alunos", ylim = c(0,70))

#gráfico de pizza
pie(tabela_naturalidade, col = c("#4c85e0","#c23899"), main = "Gráfico 2 - Gráfico de Pizza de Naturalidade dos Alunos")

FASE 4 - Parágrafo de interpretação dos gráficos e tabela

Utilizando o banco de dados Questionario_Estresse, a variável escolhida para interpretação foi a “RJ” que, embora representasse com “1” os alunos do RJ e com “2” os alunos de outras cidades, tratava-se de uma variável qualitativa nominal. Assim, após a correção do tipo de variável, foi possível criar uma tabela de números absolutos que demonstrou que 62 alunos são de outras cidades e 33 são do Rio de Janeiro. Com esses dados, criou-se o Gráfico 1 - Gráfico de Barras de Naturalidade dos Alunos, sendo possível observar que alunos do Rio de Janeiro são minoria entre os alunos do curso. A partir da proporção dos dados da tabela criada, foi possível verificar que aproximadamente 65,3% do alunos do curso estudado são de outras cidades, enquanto 34,7% do Rio de janeiro. Para visualização, o Gráfico 2 - Gráfico de Pizza de Naturalidade dos Alunos demonstra que mais da metade dos alunos não são do Rio de Janeiro.