com base em um questionário da USP vamos analisar uma variável quantitativa versus uma qualitativa pada depois analisarmos como essas características se relacionam com outras contidas na base de dados

Passo um

importar a base de dados

como de costume, a primeira coisa a ser feita é importar a base de dados que vamos utilizar

library(readxl)
## Warning: package 'readxl' was built under R version 4.2.3
questionario_usp <- read_excel("C:/Users/12389905412/Desktop/Base_de_dados-master/questionario_usp.xlsx")

Passo dois

Análise

após importada a base de dados podemos de fato começar a análise dos dados, primeiramente serão escolhidas duas variáveis aleatórias para a montagem de um gráfico para que assim possamos discorrer sobre suas características e peculiaridades

library(flextable)
## Warning: package 'flextable' was built under R version 4.2.3
library(dplyr)
## Warning: package 'dplyr' was built under R version 4.2.3
## 
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
## 
##     filter, lag
## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union
boxplot(questionario_usp$Idade~questionario_usp$Fuma,col="#99f2ef",ylab = "Idade",xlab = "Fuma")

nesse gráfico as váriaveis escolhidas foram “fuma” e “idade”,partindo do gráfico podemos veer que dentre os que não fumam os quatro quartis estão entre 17 e 20 anos tendo mais quatro outliers acima dessa faixa etária. Já os que fumam estão todos entre 18 e 21 anos sendo que o primeiro quartil está contido no segundo e o terceiro é o maior entre os quatro não apresentando outliers

para investigar mais a fundo a categoria de fumantes vamos analisar qual o sexo dos fumantes

tabela_1=table(questionario_usp$Sexo,questionario_usp$Fuma)
barplot(tabela_1, col = c("violet","royalblue"), beside = TRUE, legend.text = rownames(tabela_1),ylab = "qnt. de pessoas")

podemos notar que para os dois casos (fumantes e não fumantes), as mulheres são maioria, mostrando maios consciência mas também maior tendência a vícios.

#Conclusão o fumo é um hábito/vício que contém muitas peculiaridadesque merecem uma análise profuna sobre seus padrões, a análise feita nessa publicação é apenas uma parte superficial dos muitos dados que podem ser cruzados quando analisando o tabagismo.