Atividade 5 - cruzamento de variável qualitativa e variável quantitativa

Carregar base de dados Pokemon

load("C:/Users/carol/OneDrive/Documentos/UNIRIO/Segundo Periodo ADM/Estatistica/Base_de_dados-master/df_pokemon.RData")

Cruzamento de uma variável Qualitativa por uma Quantitativa

library(dplyr)
## Warning: package 'dplyr' was built under R version 4.0.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
library(flextable)
## Warning: package 'flextable' was built under R version 4.0.5
library(reactable)
## Warning: package 'reactable' was built under R version 4.0.5
df %>% select (type_1,speed) %>% 
  group_by(type_1) %>% 
  summarise (Média=round(mean(speed),2),
             Desvio_Padrao=round(sd(speed),2)) %>% 
  flextable() %>% theme_tron()
## `summarise()` ungrouping output (override with `.groups` argument)

Visualizaçao dessa tabela em boxplot

par(cex=0.5)
boxplot(speed~type_1, data=df, col=c("#f50707","#f59e07"),
        horizontal = F, ylim  = c(0,250),
        main="Boxplot da rapidez dos tipos de pokemons")

Interpretação

O pokemon tipo flying tem a maior média e o fairy tem a menor média. Quanto ao desvio padrão, o pokemon tipo flying também tem o maior desvio e o tipo dragon tem o menor desvio.

Ao observarmos o gráfico nota-se que a maioria dos tipos de pokemons tem suas distuibuições simétricas de acordo com a sua rapidez (o normal, poison, psychic, water, bug, fihting, ghost, grass).

Eletric e flying tem suas distuibuiçoes com maior distorção sendo assimétricos; E o Bug e psychic são os tipos de pokemons mais rapidos.