O trabalho em questão tem finalidade de mostrar de maneira visual uma tabela (com média e desvio padrão), um boxplot e uma analise de um cruzamento de variável qualitativa e variável quantitativa.
load("C:/Users/suell/OneDrive/Documentos/Aula de Estatistica/Base_de_dados-master/df_pokemon.RData")
library(dplyr)
##
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
##
## filter, lag
## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, union
library(flextable)
df %>% select (type_1,defense) %>%
group_by(type_1) %>%
summarise (Média=round(mean(defense),2),
Desvio_Padrao=round(sd(defense),2)) %>%
flextable() %>% theme_tron()
type_1 | Média | Desvio_Padrao |
bug | 67.70 | 32.22 |
dark | 67.93 | 23.80 |
dragon | 79.12 | 22.62 |
electric | 59.08 | 20.35 |
fairy | 65.71 | 18.98 |
fighting | 64.28 | 18.32 |
fire | 63.70 | 21.35 |
flying | 61.67 | 23.63 |
ghost | 76.83 | 34.80 |
grass | 69.36 | 23.96 |
ground | 82.17 | 31.89 |
ice | 71.04 | 35.11 |
normal | 57.80 | 22.35 |
poison | 68.82 | 21.07 |
psychic | 65.15 | 26.44 |
rock | 98.50 | 36.42 |
steel | 119.41 | 33.28 |
water | 70.49 | 25.58 |
par(cex=0.4)
boxplot(defense~type_1, data=df, col=c("pink","purple"),
horizontal = F, ylim = c(0,250),
main="Defesa dos tipos de pokemons")
Observando os dados apresentados sobre o cruzamento das variáveis, podemos analisar que entre os tipos de pokémon apresentados, o tipo que apresenta maior média no quesito defesa é o eteel com uma média de 119.41 e logo atras dele vem o rock com a média 98.50 de defesa. Agora os pokémon que possuem uma média de defasa mais baixa, podemos citar o normal com uma média de 57.80 e em seguida electric com 59.08.
Seguindo para o desvio padrão, o tipo que possui maior desvio em defesa com 36.42 é o rock, porém podemos acrescentar uns outros que não possui um desvio muito distinto como ice (35.11), ghost (34.80) e eteel (33.28). Já os de menor desvio padrão em relação a defesa, se encontra os dos tipos Fighting com um desvio padrão de 18.32 e Fairy com 18.98. E pensando na diferença entre desvio padrão e média, deve se observa que não tem nenhum com uma diferença próxima.
No boxplot, é possível observar que os tipos de Pokémon que possui uma distribuição mais simétrica é o water e ground, enquanto os pokémon flying e but sendo os mais assimétricos. Ressaltasse também que o tipo steel é o que contem máxima maior entre os pokémon.