Aqui vamos fazer uma análise de dados sobre os stats de defesa dos pokémon da base de dados.
load("C:\\Users\\pedro\\OneDrive\\Documentos\\Base_de_dados-master\\df_pokemon.RData")
mean(df$defense)
## [1] 70.6727
Aqui podemos ver que a média da defesa dos 718 pokémon nessa base de dados é de aproximadamente 70,7.
median(df$defense)
## [1] 65
Já a mediana das defesas dos pokémon é 65.
sd(df$defense)
## [1] 29.18498
E apresenta um desvio padrão de aproximadamente 20,2, mostrando que as defesas estão, em geral, 20 pontos de distância da média de 70,7.
hist(df$defense, col = c("darkblue"), xlab = "Pontos de defesa", ylab = "Frequência", main = "Histograma de defesa dos pokémon")
No histograma podemos ver que há uma aglomeração de dados entre 50 e 100, como registrado antes pela média e pela mediana, respectivamente de 70,7 e 65. Podemos ver também que existem outliers perto ou acima de 200 pontos na defesa.