Introdução

Carregamento do banco de dados, contrução de tabela e visualização com gráfico de pizza.

Passo zero

Carregar o banco de dados Pokemon

# Passo 0 - Carregar a base de dados
load("/cloud/project/bases_curso_estatistica/Base_de_dados-master/df_pokemon.RData")

Passo 1

Construção de tabela

#Análise de uma variável qualitativa
# Passo 1 - Construir as tabelas
tab_pok<-table(df$type_1)

tab_pok
## 
##      bug     dark   dragon electric    fairy fighting     fire   flying 
##       63       28       24       36       17       25       46        3 
##    ghost    grass   ground      ice   normal   poison  psychic     rock 
##       23       66       30       23       93       28       46       40 
##    steel    water 
##       22      105

Passo 2

Percentuais

# Passo 2 - Percentual
tab_pok
## 
##      bug     dark   dragon electric    fairy fighting     fire   flying 
##       63       28       24       36       17       25       46        3 
##    ghost    grass   ground      ice   normal   poison  psychic     rock 
##       23       66       30       23       93       28       46       40 
##    steel    water 
##       22      105
round(prop.table(tab_pok)*100,2)
## 
##      bug     dark   dragon electric    fairy fighting     fire   flying 
##     8.77     3.90     3.34     5.01     2.37     3.48     6.41     0.42 
##    ghost    grass   ground      ice   normal   poison  psychic     rock 
##     3.20     9.19     4.18     3.20    12.95     3.90     6.41     5.57 
##    steel    water 
##     3.06    14.62

Passo 3

Gráfico de barras

# Passo 3 - Gráfico de barras

barplot(tab_pok, col = c("#21ded1","#4b9691","#062b29","#88d966","#2d541d","#b8e3a6","#c4a6e3","#da6fe8","#edcb80","#b4d609","#232ca6","#a9abc4","#8bcc9f","#3ef779","red","royalblue","#ba389c","skyblue"), main = "Gráfico - tipos de pokemon", ylim = c(0,120))

Análise

O tipo “water” é o que apresenta o maior percentual 14,62%, seguido pelo tipo normal que corresponde a cerca de 12.95%. Já o menor tipo apresentado é o “flying”.