Pokemon

library(rio)
df <- import(file = "~/bases_curso_estatistica/Base_de_dados-master/df_pokemon.RData")

Sobre

A análise abaixo avaliou todos Pokémons quanto suas características de:

Altura

Peso

Ataque

Defesa

Velocidade

Ataque Especial

Defesa Especial

Para cada item foi plotado um gráfico de violino;

par(mfrow=c(1,2))
vioplot::vioplot(df$height, range=5, horizontal=FALSE, col="skyblue", border="black", lty=1, lwd=1, rectCol="black", colMed="white", pchMed=19, add=FALSE, wex=1, drawRect=TRUE, main = "Altura em cm x 10")
vioplot::vioplot(df$weight, range=5, horizontal=FALSE, col="darkblue", border="black", lty=1, lwd=1, rectCol="black", colMed="white", pchMed=19, add=FALSE, wex=1, drawRect=TRUE, main = "Peso em g x 100")

par(mfrow=c(1,2))
vioplot::vioplot(df$attack, range=5, horizontal=FALSE, col="red", border="black", lty=1, lwd=1, rectCol="black", colMed="white", pchMed=19, add=FALSE, wex=1, drawRect=TRUE, main = "Ataque")
vioplot::vioplot(df$defense, range=5, horizontal=FALSE, col="purple", border="black", lty=1, lwd=1, rectCol="black", colMed="white", pchMed=19, add=FALSE, wex=1, drawRect=TRUE, main = "Defesa")

par(mfrow=c(1,3))
vioplot::vioplot(df$speed, range=5, horizontal=FALSE, col="green", border="black", lty=1, lwd=1, rectCol="black", colMed="white", pchMed=19, add=FALSE, wex=1, drawRect=TRUE, main = "Velocidade")
vioplot::vioplot(df$special_attack, range=5, horizontal=FALSE, col="orange", border="black", lty=1, lwd=1, rectCol="black", colMed="white", pchMed=19, add=FALSE, wex=1, drawRect=TRUE, main = "Ataque especial")
vioplot::vioplot(df$special_defense, range=5, horizontal=FALSE, col="pink", border="black", lty=1, lwd=1, rectCol="black", colMed="white", pchMed=19, add=FALSE, wex=1, drawRect=TRUE, main = "Defesa especial")

Conclusão

  1. A altura média dos Pokémons é de aproximadamente 100cm. A maioria dos mesmos estão distribuídos até 300cm.

  2. O peso médio dos Pokémons é de aproximadamente 50kg. A maioria dos mesmos estão distribuídos até 200kg.

  3. O ataque médio dos Pokémons é de aproximadamente 75. A maioria dos mesmos estão distribuídos entre 50 e 100.

4 A defesa média dos Pokémons é de aproximadamente 70. A maioria dos mesmos estão distribuídos entre 40 e 90.

  1. A velocidade média dos Pokémons é de aproximadamente 70. A maioria dos mesmos estão distribuídos entre 40 e 90.

  2. O ataque especial médio dos Pokémons é de aproximadamente 60. A maioria dos mesmos estão distribuídos entre 40 e 90.

  3. A defesa especial média dos Pokémons é de aproximadamente 60. A maioria dos mesmos estão distribuídos entre 40 e 80.