###ATIVIDADE 7

##IMPORTANDO BANCO DE DADOS DF_POKEMON

load("C:/Users/Davi/Desktop/df_pokemon.RData")

##USANDO O PACK GGPLOT2

library(ggplot2)

##CRIANDO DENSITY PLOT ACERCA DO ATAQUE DOS POKEMONS

ggplot(df, aes(attack)) + geom_density(fill = "#e82edf", alpha = .3) + labs( x = "Attack", y = "Distribuition of data")+ggtitle("Density plot sobre o ataque dos pokemons")

##Ao analisar o gráfico, pode-se observar que a maioria dos pokemons possuem o ataque entre 50 e 100, e poucos pokemons com o ataque inferior a 25 e superior a 150.