Atividade5
Ana Beatriz Fonseca
19 de setembro de 2019
Atividade 5 utilizando a base de dados Pokémon
Exportando a base da dados
Escolhi fazer essa atividade com a base de dados Pokémon e escolhi as variáveis Ataque e Tipo 1.
load("C:/Users/labccet/Downloads/Base_de_dados-master/df_pokemon.RData")
View(df)Tabela relacionando o Ataque com o tipo de Pokémon
tabela<-table(df$attack,df$type_1)
tabela##
## bug dark dragon electric fairy fighting fire flying ghost grass
## 5 0 0 0 0 0 0 0 0 0 0
## 10 1 0 0 0 0 0 0 0 0 0
## 15 0 0 0 0 0 0 0 0 0 0
## 20 2 0 0 0 1 0 0 0 0 0
## 22 1 0 0 0 0 0 0 0 0 0
## 23 0 0 0 0 0 0 0 0 0 0
## 24 0 0 0 0 0 0 0 0 0 0
## 25 2 0 0 0 1 0 0 0 0 0
## 27 0 0 0 0 0 0 0 0 0 1
## 29 1 0 0 0 0 0 0 0 0 0
## 30 3 0 0 1 0 0 0 1 2 2
## 33 0 0 0 0 0 0 0 0 0 0
## 35 5 0 0 1 0 1 0 0 1 3
## 36 0 0 0 0 0 0 0 0 0 0
## 38 0 0 0 1 1 0 0 0 0 0
## 40 1 0 0 3 1 1 1 0 2 3
## 41 0 0 0 0 0 0 1 0 0 0
## 42 0 0 0 0 0 0 0 0 0 0
## 43 0 0 0 0 0 0 0 0 0 0
## 44 0 0 0 0 0 0 0 0 0 0
## 45 4 0 0 2 2 0 1 0 0 3
## 46 0 0 0 0 0 0 0 0 0 0
## 47 2 0 0 0 0 0 0 0 0 0
## 48 0 0 0 0 1 0 0 0 0 0
## 49 0 0 0 0 0 0 0 0 0 2
## 50 1 1 1 3 1 0 2 0 3 2
## 51 0 0 0 0 0 0 0 0 0 0
## 52 1 0 0 0 1 0 2 0 0 0
## 53 1 0 0 0 0 0 1 0 0 1
## 54 0 1 0 0 0 0 0 0 0 0
## 55 2 2 0 4 0 0 0 0 1 3
## 56 0 0 0 0 0 0 0 0 0 0
## 57 0 0 0 0 0 0 0 0 0 0
## 58 0 0 0 1 0 0 1 0 0 0
## 59 1 0 0 0 0 0 1 0 0 0
## 60 3 1 0 2 0 2 2 0 2 4
## 61 0 0 0 0 0 0 0 0 0 1
## 62 0 0 0 0 0 0 0 0 0 3
## 63 1 0 0 1 0 0 1 0 0 0
## 64 0 0 1 0 0 0 2 0 0 0
## 65 4 4 0 2 2 0 0 0 1 3
## 66 0 0 0 0 0 0 0 0 1 0
## 67 0 0 0 0 0 0 0 0 0 1
## 68 0 0 0 0 0 0 1 0 0 2
## 69 0 0 0 0 0 0 1 0 0 0
## 70 3 0 2 1 1 1 1 1 2 2
## 71 0 0 0 0 0 0 0 0 0 0
## 72 0 0 0 0 1 0 0 0 0 0
## 73 1 0 0 0 0 0 1 0 0 0
## 74 0 0 0 0 0 0 0 0 0 0
## 75 1 2 2 3 0 0 1 0 1 3
## 76 1 0 0 0 0 0 1 0 0 0
## 77 1 0 0 0 0 0 0 0 0 0
## 78 0 0 0 0 0 0 1 0 0 1
## 80 1 0 1 0 2 3 0 0 1 2
## 81 0 0 0 0 0 0 1 0 0 0
## 82 0 0 0 0 0 1 0 0 0 2
## 83 0 0 0 1 0 0 0 0 0 0
## 84 0 0 1 0 0 0 2 0 0 0
## 85 2 3 0 3 0 1 3 0 0 3
## 86 0 0 0 0 0 0 0 0 0 1
## 87 0 0 1 0 0 0 0 0 0 0
## 88 0 1 0 0 0 0 0 0 0 0
## 89 0 0 0 0 0 0 0 0 0 1
## 90 5 4 2 2 0 0 2 0 1 2
## 91 0 0 0 0 0 0 0 0 0 0
## 92 0 1 0 0 0 1 0 0 1 1
## 93 0 0 0 0 0 0 1 0 0 0
## 94 1 0 0 0 0 0 0 0 0 1
## 95 2 1 1 0 0 1 2 0 0 1
## 97 0 0 0 0 0 0 1 0 0 0
## 98 0 0 0 0 0 0 1 0 0 1
## 100 1 0 2 1 0 2 3 0 2 5
## 102 0 0 0 0 0 0 0 0 0 0
## 103 1 0 0 0 0 0 0 0 0 0
## 104 0 0 0 0 0 0 1 0 0 0
## 105 0 2 0 0 0 3 0 0 0 1
## 106 0 0 0 0 0 0 0 0 0 0
## 107 0 0 0 0 0 0 0 0 0 1
## 108 0 0 0 0 0 0 0 0 0 0
## 109 1 0 0 0 0 0 0 0 0 1
## 110 1 0 0 0 0 1 1 0 1 1
## 112 0 0 0 0 0 0 0 0 0 0
## 115 0 0 0 2 0 0 1 1 1 1
## 117 0 0 1 0 0 0 0 0 0 0
## 120 1 1 2 1 1 2 1 0 0 0
## 121 0 0 0 0 0 0 0 0 0 0
## 123 0 0 0 1 0 0 1 0 0 0
## 124 0 0 0 0 0 1 0 0 0 0
## 125 2 2 0 0 0 2 0 0 0 0
## 129 0 0 0 0 0 0 0 0 0 0
## 130 1 1 2 0 0 1 2 0 0 1
## 131 0 1 0 0 1 0 0 0 0 0
## 134 0 0 1 0 0 0 0 0 0 0
## 135 1 0 1 0 0 0 0 0 0 0
## 140 0 0 0 0 0 1 1 0 0 0
## 147 0 0 1 0 0 0 0 0 0 0
## 150 0 0 2 0 0 0 0 0 0 0
## 160 0 0 0 0 0 0 0 0 0 0
## 165 0 0 0 0 0 0 0 0 0 0
##
## ground ice normal poison psychic rock steel water
## 5 0 0 2 0 0 0 0 0
## 10 0 0 1 0 0 0 0 1
## 15 0 0 0 0 0 0 0 1
## 20 0 0 2 0 1 0 0 2
## 22 0 0 0 0 0 0 0 0
## 23 0 0 0 0 1 0 0 0
## 24 0 0 0 0 0 0 1 0
## 25 0 0 0 0 4 0 0 0
## 27 0 0 0 0 0 0 0 0
## 29 0 0 0 0 0 0 0 0
## 30 0 1 3 0 3 0 0 3
## 33 0 0 0 0 1 0 0 0
## 35 0 0 0 0 2 0 0 0
## 36 0 0 1 0 0 0 0 0
## 38 0 0 0 0 0 0 0 1
## 40 1 1 1 0 1 1 0 4
## 41 0 0 0 0 0 1 0 0
## 42 0 0 0 0 0 1 0 0
## 43 0 0 0 1 0 0 0 0
## 44 0 0 0 0 0 0 0 1
## 45 0 0 5 1 4 2 0 3
## 46 0 0 1 0 0 0 0 0
## 47 0 0 0 1 0 0 0 0
## 48 0 0 1 0 3 0 0 3
## 49 0 0 0 0 0 0 0 1
## 50 1 6 3 2 3 1 1 5
## 51 0 0 1 0 0 0 0 1
## 52 0 0 0 0 0 2 0 1
## 53 0 0 0 0 0 0 0 2
## 54 0 0 0 0 0 0 0 0
## 55 1 1 7 0 3 2 2 2
## 56 0 0 2 0 0 0 0 1
## 57 0 0 0 1 1 0 0 0
## 58 0 0 0 0 1 0 0 1
## 59 0 0 0 0 0 1 0 0
## 60 1 2 8 2 0 1 0 2
## 61 0 0 0 1 0 0 0 0
## 62 0 0 0 1 0 0 0 0
## 63 0 0 0 1 0 0 0 2
## 64 0 0 0 0 0 1 0 1
## 65 0 1 3 1 3 0 0 9
## 66 1 0 1 0 0 0 0 1
## 67 0 0 0 0 0 0 0 1
## 68 0 0 0 0 0 0 0 0
## 69 0 1 0 0 0 0 0 1
## 70 2 1 6 0 1 0 1 5
## 71 0 0 1 0 0 0 0 0
## 72 2 0 0 1 1 0 0 1
## 73 0 0 0 1 1 0 0 1
## 74 1 0 0 0 0 0 0 0
## 75 2 0 1 1 3 1 2 7
## 76 0 0 2 0 0 0 0 0
## 77 0 0 2 0 0 1 0 0
## 78 0 0 0 0 0 0 0 2
## 80 2 3 9 2 0 3 4 3
## 81 0 0 1 0 0 1 0 0
## 82 1 0 1 0 0 0 0 1
## 83 0 0 1 0 0 0 0 2
## 84 0 0 0 0 0 1 0 1
## 85 2 1 6 1 0 0 2 3
## 86 0 0 0 0 0 0 0 1
## 87 0 0 0 0 0 0 0 1
## 88 0 0 0 0 0 0 0 0
## 89 0 0 0 0 0 1 1 0
## 90 0 0 2 3 1 0 2 3
## 91 0 0 1 0 0 0 0 0
## 92 0 0 0 1 0 0 0 2
## 93 0 0 0 1 0 0 0 0
## 94 0 0 0 0 0 0 0 0
## 95 1 1 3 1 0 3 0 6
## 97 0 0 0 0 0 0 0 0
## 98 0 0 0 0 0 0 0 1
## 100 3 1 3 1 3 2 2 3
## 102 0 0 0 1 0 0 0 0
## 103 0 0 0 0 0 0 0 0
## 104 0 0 0 0 0 0 0 1
## 105 0 0 0 1 1 3 0 4
## 106 0 0 0 1 0 0 0 0
## 107 0 0 0 0 0 0 0 0
## 108 0 0 0 0 0 0 0 1
## 109 0 0 0 0 0 0 0 0
## 110 0 1 4 0 1 0 2 1
## 112 1 0 0 0 0 1 0 0
## 115 0 0 2 0 0 1 0 0
## 117 1 1 0 0 0 0 0 0
## 120 1 0 2 0 0 1 1 3
## 121 0 0 0 0 0 1 0 0
## 123 0 0 1 0 0 0 0 0
## 124 1 0 0 0 0 0 0 0
## 125 1 0 0 0 2 2 0 1
## 129 0 0 0 0 0 1 0 0
## 130 1 1 1 0 0 0 0 1
## 131 0 0 0 0 0 0 0 0
## 134 0 0 0 0 0 1 0 0
## 135 1 0 0 0 0 1 1 0
## 140 1 0 0 0 0 1 0 0
## 147 0 0 0 0 0 0 0 0
## 150 1 0 0 0 1 0 0 0
## 160 0 0 2 0 0 0 0 0
## 165 0 0 0 0 0 1 0 0Boxplot relacionando os dados
boxplot(df$attack~df$type_1, col=c('orange4','orange3','orange2'),
main = 'Ataque dos Pokémons com seus tipos',
xlab = 'Tipos', ylab = 'Ataque')
Conclusão
Com isso, concluimos que os pokémons com os ataques mais fortes são os de tipo Dragon e tipo Rock.
