POKEMONS - ATIVIDADE AULA 4
JULIANA VIEIRA, MATRÍCULA 20192520202
29/11/2021
library(readr)
df_pokemon <- read_csv("C:/Users/pedro2105/Dropbox (pedro nascimento)/My PC (LAPTOP-64L13HB0)/Desktop/Base_de_dados-master/df_pokemon.RData")## Warning: One or more parsing issues, see `problems()` for details## Rows: 231 Columns: 1## -- Column specification --------------------------------------------------------
## Delimiter: ","
## chr (1): RDX2##
## i Use `spec()` to retrieve the full column specification for this data.
## i Specify the column types or set `show_col_types = FALSE` to quiet this message.View(df_pokemon)
load("C:/Users/pedro2105/Dropbox (pedro nascimento)/My PC (LAPTOP-64L13HB0)/Desktop/Base_de_dados-master/df_pokemon.RData")OLHAR A BASE DE DADOS
Nessa etapa iremos trabalhar olhando a base de dados, a medida máxima e a mínima de cada participante.
str(df)## tibble [718 x 22] (S3: tbl_df/tbl/data.frame)
## $ id : num [1:718] 1 2 3 4 5 6 7 8 9 10 ...
## $ pokemon : chr [1:718] "bulbasaur" "ivysaur" "venusaur" "charmander" ...
## $ species_id : int [1:718] 1 2 3 4 5 6 7 8 9 10 ...
## $ height : int [1:718] 7 10 20 6 11 17 5 10 16 3 ...
## $ weight : int [1:718] 69 130 1000 85 190 905 90 225 855 29 ...
## $ base_experience: int [1:718] 64 142 236 62 142 240 63 142 239 39 ...
## $ type_1 : chr [1:718] "grass" "grass" "grass" "fire" ...
## $ type_2 : chr [1:718] "poison" "poison" "poison" NA ...
## $ attack : int [1:718] 49 62 82 52 64 84 48 63 83 30 ...
## $ defense : int [1:718] 49 63 83 43 58 78 65 80 100 35 ...
## $ hp : int [1:718] 45 60 80 39 58 78 44 59 79 45 ...
## $ special_attack : int [1:718] 65 80 100 60 80 109 50 65 85 20 ...
## $ special_defense: int [1:718] 65 80 100 50 65 85 64 80 105 20 ...
## $ speed : int [1:718] 45 60 80 65 80 100 43 58 78 45 ...
## $ color_1 : chr [1:718] "#78C850" "#78C850" "#78C850" "#F08030" ...
## $ color_2 : chr [1:718] "#A040A0" "#A040A0" "#A040A0" NA ...
## $ color_f : chr [1:718] "#81A763" "#81A763" "#81A763" "#F08030" ...
## $ egg_group_1 : chr [1:718] "monster" "monster" "monster" "monster" ...
## $ egg_group_2 : chr [1:718] "plant" "plant" "plant" "dragon" ...
## $ url_image : chr [1:718] "1.png" "2.png" "3.png" "4.png" ...
## $ x : num [1:718] 32.8 33.3 33.9 -24.4 -24.6 ...
## $ y : num [1:718] 17.2 16.7 16.2 30.8 30.6 ...summary(df)## id pokemon species_id height
## Min. : 1.0 Length:718 Min. : 1.0 Min. : 1.00
## 1st Qu.:180.2 Class :character 1st Qu.:180.2 1st Qu.: 6.00
## Median :359.5 Mode :character Median :359.5 Median : 10.00
## Mean :359.5 Mean :359.5 Mean : 11.41
## 3rd Qu.:538.8 3rd Qu.:538.8 3rd Qu.: 14.00
## Max. :718.0 Max. :718.0 Max. :145.00
## weight base_experience type_1 type_2
## Min. : 1.0 Min. : 36.00 Length:718 Length:718
## 1st Qu.: 95.0 1st Qu.: 65.25 Class :character Class :character
## Median : 280.0 Median :147.00 Mode :character Mode :character
## Mean : 568.2 Mean :141.55
## 3rd Qu.: 609.5 3rd Qu.:177.00
## Max. :9500.0 Max. :608.00
## attack defense hp special_attack
## Min. : 5.00 Min. : 5.00 Min. : 1.00 Min. : 10.00
## 1st Qu.: 53.00 1st Qu.: 50.00 1st Qu.: 50.00 1st Qu.: 45.00
## Median : 73.00 Median : 65.00 Median : 65.00 Median : 65.00
## Mean : 74.85 Mean : 70.67 Mean : 68.37 Mean : 68.47
## 3rd Qu.: 95.00 3rd Qu.: 85.00 3rd Qu.: 80.00 3rd Qu.: 90.00
## Max. :165.00 Max. :230.00 Max. :255.00 Max. :154.00
## special_defense speed color_1 color_2
## Min. : 20.00 Min. : 5.00 Length:718 Length:718
## 1st Qu.: 50.00 1st Qu.: 45.00 Class :character Class :character
## Median : 65.00 Median : 65.00 Mode :character Mode :character
## Mean : 69.09 Mean : 65.72
## 3rd Qu.: 85.00 3rd Qu.: 85.00
## Max. :230.00 Max. :160.00
## color_f egg_group_1 egg_group_2 url_image
## Length:718 Length:718 Length:718 Length:718
## Class :character Class :character Class :character Class :character
## Mode :character Mode :character Mode :character Mode :character
##
##
##
## x y
## Min. :-49.152 Min. :-45.793
## 1st Qu.:-17.695 1st Qu.:-17.293
## Median : 0.705 Median : -0.628
## Mean : 0.000 Mean : 0.000
## 3rd Qu.: 15.905 3rd Qu.: 18.155
## Max. : 53.142 Max. : 46.593MONTAR O HISTOGRAMA
Nessa etapa iremos montar o histograma (por se tratar de uma varíavel quantitativa).
hist(df$weight, col=("red"), border = "blue", main= "HISTOGRAMA, PESO POKEMONS", xlab="PESO"
, ylab ="FREQUÊNCIA")
CONLUSÃO
Primeira mente é necessario dizer que se trata de um histograma assímétrico para a direita com apenas um vale. Além disso, é cabível dizer que é baixa a incidência de pokemons com o peso de 4.000 kgs. Sendo que a maioria está na maioria faixa entre 0 e 2.000 kgs. Ao análisar os valores também o “mais leve”, possui 1 kg e o mais pesado possui 9.500 kgs, a média dos pesos é de 568.2 kg.