load("C:/Users/bruno/OneDrive/Pictures/df_pokemon.RData")
summary(df$speed)
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
   5.00   45.00   65.00   65.72   85.00  160.00

A análise descritiva mostra que o menor valor de velocidade atribuido a um pokemon é 5 e que o maior valor de velocidade atribuido a um pokemon é 160. A análise também mostra que 25% dos pokemons possuem 45 ou menos do atributo velocidade, 50% possuem 65 ou menos do atributo velocidade e que 75% possuem 85 ou menos do atributo velocidade. A análise também mostra que a média e mediana são diferentes, o que indica que o histograma dessa população não é simétrico.

hist(df$speed, col="#f79307", xlab = "Velocidade", ylab = "Frequência", main = "Histograma da Velocidade dos Pokemons")

O histograma mostra que a maioria dos pokemons possui a base do atributo velocidade por volta de 50, enquanto a minoria está por volta de 150

boxplot(df$speed, col= "#1ac9c4", main =  "Boxplot da Velocidade dos Pokemons")

Já o gráfico boxplot mostra a análise descritiva de maneira mais visual, indicando graficamente onde se encontram os cortes do primeiro quartil, mediana, terceiro quartil. Além disso, o boxplot mostra que a população analisada possui dois pokemons com a velocidade enquadrada como oultier, ou seja, pontos fora da curva. Esses pokemons são Deoxys-normal e Ninjask, e possuem velocidade de 150 e 160 respectivamente.