load("C:/Users/Felipe/Downloads/Base_de_dados-master/df_pokemon.RData")
summary(df$weight)
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 1.0 95.0 280.0 568.2 609.5 9500.0
hist(table(df$weight),col=c("pink","red","white","blue","green","purple","orange","black"),main="histograma")
# minha interpretação analisando o histograma,é possível perceber que a maior frequencia se encontra na cor rosa,passando de 300.Em seguida, pode-se ver que a frequencia diminui bruscamente,chegando no máximo perto de 50,onde podemos encontrar a cor vermelha.Depois,vem a cor branca, a qual diminui também a frequencia, chegando ao máximo de 30. As cores azul,verde,amarelo e roxo, também possuem apenas queda em sua frequencia, com a cor roxa chegando a ficar com 0.Portanto, vemos que apenas na cor rosa há uma frequencia de fato alta, enquanto nas outras cores, ela cai de maneira brusca.