Untitled

{r setup, include=FALSE} knitr::opts_chunk$set(echo = TRUE)

summary(df$special_defense)

table(df$special_attack)

hist(table(df$special_defense),col =  c("red","blue","purple","green", "orange","black","pink","white"),main ="Histograma")

Primeiramente abri o arquivo denominado “df_pokemon.RData” e realizei as modificões para que o arquivo abrisse da forma correta, logo em seguida começei a análise descritiva e para isso efetuei um comando para para que fosse criado uma tabela com os valores dos ataques especiais.

Depois por meio do comando summary calculei a mínima, a média e a máxima dos ataques especiais e por fim criei um histograma que realizou uma analise elaborada de todos os ataques dos pokemons identificando assim algumas informaçoes importantes.