library(readr)

load("C:/Users/pedro2105/Dropbox (pedro nascimento)/My PC (LAPTOP-64L13HB0)/Desktop/Base_de_dados-master/df_pokemon.RData")
View(df)

Média e desvio - padrão para a variável de nível de defesa e sua relação com os tipos de desenvolvimento no estágio inicial da vida do pokemon

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)
library(reactable)

# TIPO E DEFESA


df %>% select(egg_group_1,defense) %>%
  group_by(egg_group_1) %>% 
  summarise(Média=round(mean(defense),2),
            Desvio_Padrao=round(sd(defense),2)) %>% reactable()

RESOLUÇÕES

Pokemons de modelos que possuem o tipo de desenvolvimento na categoria mineral tendem a ter maior média (96.13) porém, seu desvio padrão é um dos mais altos (35.08). Dessa forma, somos levados a crer que seus números não são homogêneos.

BOXPLOT

boxplot(defense~egg_group_1, data=df,
        col=c("red","royalblue"),
        horizontal =F,main="Gráfico tipo de desenvolvimento por nível de defesa")

RESOLUÇÕES

Não há uma simetria dentro dos tipos de desenvolvimento dentro da sua relação com níveis de defesa. É notória a presença de diversos “outliers” dentro do gráfico - valor aberrante ou valor atípico, é uma observação que apresenta um grande afastamento das demais da série, ou que é inconsistente. E nenhum dos pokemons analisados possuí um nível de defesa menor ou igual a zero. Além disso, a maior mediana e o mínimo em relação ao nível de defesa é do grupo que não se desenvolve em ovos. Outro fato curioso é que o maior máximo é do grupo de desenvolvimento indeterminado.