R Markdown

#Introdução

Para o trabalho de hoje, irei tratar e analisar a base de dados -questionário usp e interpretar os resultados.

A base de dados em questão, contém dados sobre os estudantes da Universidade de São Paulo, como: altura, peso, se fuma ou não e outros.

Passo 1

Para iniciar a análise, eu irei subir a base de dos para o R

library(readxl)
questionario_usp <- read_excel("C:/Users/noeli/Base_de_dados-master/questionario_usp.xlsx")

Passo 2

Após subir a base de dados, eu irei adicionar os pacotes necessários para utilizar as funções de gráficos e tabelas para fazer a análise

library(flextable)
library(dplyr)
## 
## 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

Passo 3

Com os pacotes instalados, irei montar o gráfico com as informações que eu quero trabalhar.

boxplot(questionario_usp$Alt~questionario_usp$Fuma,col="pink",ylab = "altura",xlab = "Fuma")

Conclusão

Com a criação do gráfico, posso concluir, com base nas informações sobre a altura dos estudantes e seu hábito de fumar, que os estudantes, tanto fumantes quanto não fumantes, apresentam alturas compreendidas entre 1,54 e 1,85, sem a presença de valores atípicos.

Embora seja amplamente reconhecido que o tabagismo seja prejudicial à saúde, podemos observar que, no grupo específico analisado, a média de altura dos fumantes é maior do que a dos não fumantes. Isso ocorre devido ao fato de que esse aspecto físico em particular não é influenciado pelos efeitos do cigarro no organismo humano.