Tarefa 04

1. Fazer o upload da base de dados

load("C:/Users/Usuario/Desktop/Base_de_dados-master/df_pokemon.RData")  
pokemon <- df

2. Visualização das variáveis

names(pokemon)
##  [1] "id"              "pokemon"         "species_id"      "height"         
##  [5] "weight"          "base_experience" "type_1"          "type_2"         
##  [9] "attack"          "defense"         "hp"              "special_attack" 
## [13] "special_defense" "speed"           "color_1"         "color_2"        
## [17] "color_f"         "egg_group_1"     "egg_group_2"     "url_image"      
## [21] "x"               "y"

3. Criando a tabela da variável escolhida

A variável qualitativa escolhida foi o tipo do Pokémon
pokemon_tipo <- table(pokemon$type_1)
pokemon_tipo
## 
##      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

4. Criando o gráfico da variável

barplot(pokemon_tipo, las = 2, col = "red",
        main = "solução 1")

Analisando esse gráfico, percebemos que o tipo prioritário (1) que contém o maior número de pokémons é o tipo Water, que contém 105 pokémons nessa categoria. Ele é o único que passa da primeira centena. Já o tipo que possui o menor número é o Flying, com apenas 3. A faixa que contém o maior número de tipos é a dos 20 à 30 pokémons, que contém os tipos Dark, Dragon, Fighting, Ghost, Ice, Poison e Steel.