Nesse trabalho tivemos como objetivo realizar a media e desvio-Padrão para uma variável quantitativa por grupos de uma variável qualitativa. Para tanto utilizei a defesa como variável quantitativa e tipos de pokemon como variável qualitativa.

De inicio carreguei a base de dados

load("C:/Users/manuc/Desktop/Base_de_dados-master/df_pokemon.RData")
#Passo0 - Carregar as bibliotecas:
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
library(flextable)

Tabela

Dando continuidade fiz uma tabela de defesa por tipos de pokemon, podemos analisar que existem 18 tipos de pokemon, além disso ficou visivel que: O Tipo de Pokemon com a maior media de defesa é o tipo rock; O tipo com a menor média de defesa é o tipo normal; O tipo de pokemon com o maior valor de desvio padrão de defesa é o tipo ice; O tipo de pokemon com o menor valor de desvio padrão de defesa é o tipo fighting.

ft <- df %>% select(type_1, defense) %>% group_by(type_1) %>% summarise(Média_Def=mean(defense),
                                                                        Desvio_DF=sd(defense),
                                                                        Quantidade_Tipo_1=n()) %>% 
  
  data.frame() %>% flextable()


ft <- bg(ft, bg = "purple", part = "header")
ft <- bg(ft, bg = "pink", part = "body")
ft

Realização do Boxplot

Podemos observar que foi construido um boxplot com todos os tipo de pokemon. Além disso existem sete tipos de pokemons com Outliers e ao todo existem 8 outliers presente. Outro ponto a se analisar é que a maioria dos boxplots possuem intervalo com valores de 50-100.

# Boxplot da Defesa dos tipos de pokemon 

boxplot(defense~type_1, data = df,
        col=c("green","red","yellow","blue","orange","purple","pink", "violet","brown","grey","#7eafd6", "#300730","#d1133f","#505730","#e89161","#7ffaf2","#5d7985", "#00eb1b"), main="Gráfico de defesa dos tipos de Pokemon",
        xlab = "Tipos de Pokemon",
        ylab = "Defesa" )

Conclusão

Ao analisar os dados o pokemon com melhor caracteristica de defesa, seria o pokemon do tipo dragon, pois além dele possui um valor ainda alto, ele possui um desvio padrão mais equilibrado.