Aqui vamos carregar a base de dados

load("C:/Users/vitor/Desktop/Base_de_dados-master/df_pokemon.RData")

Aqui teremos o Histograma

hist(df$height, 
     main = "Histograma da altura dos pokemons", 
     col = "skyblue", 
     ylab = "Frequência", 
     xlab = "Altura")

Com esse histograma, podemos perceber que ele é assimétrico, tendo uma grande concentração de pokemons com alturas baixas. Percebe-se também que mais da metade dos pokemons tem altura inferior ou igual a 10, já que no histograma mostra uma frequência em torno de 400 para esse caso e há 718 espécies no banco de dados.

Aqui teremos o box-plot

boxplot(df$height, 
        main = "Box-plot da altura dos pokemons", 
        col = "#cf74cf", 
        ylim = c(0,150),
        ylab = "Altura")

O box-plot nos mostra uma enorme concentração na parte inferior do gráfico e, por consequência, sua distribuição assimétrica. Podemos ver que a mediana e todos os quartis estão abaixo de 50 em relação à altura(no sumário mais a frente veremos que a mediana é 10 e o 3º quartil é 14, confirmando essa leitura).

Podemos perceber também a presença de uma grande quantidade de outliers no box-plot que chegam até perto do valor 150.

Aqui teremos a análise descritiva

summary(df$height)
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
   1.00    6.00   10.00   11.41   14.00  145.00 

No sumário, podemos ver que pelo menos metade dos pokemons tem altura inferior ou igual a 10, já que a mediana = 10, além disso, analisando os quartis notamos que do valor mínimo até o 1º quartil(os primeiros 25%) a altura varia entre 1 e 6, do 1º quartil para a mediana(25% seguintes) ela varia entre 6 e 10, da mediana para o 3º quartil(50%-75%) varia entre 10 e 14 e, por ultimo, do 3º quartil para o valor máximo(últimos 25%) varia entre 14 e 145.

Com a análise dos quartis e com a média, também pode-se comprovar a concentração de pokemons com baixa estatura, assim como a mediana tinha informado anteriormente.