#Carregando base de dados

load("C:/Users/vinny/Desktop/Base_de_dados-master/df_pokemon.RData")
names(df)
##  [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"

#Carregando blibioteca DPLYR

library(dplyr)
## Warning: package 'dplyr' was built under R version 4.0.5
## 
## 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

#Diagrama de Despersão

par(bg="lightyellow")
plot(df$height,df$speed,pch=20, col="skyblue", main="Diagrama de Dispersão (Velocidade x Altura)",xlab = "altura",ylab ="velocidade")
abline(lsfit(df$height,df$speed), col="darkred")

par(bg="white")

#Matriz de correlação

df_quant <- df %>% select(speed,height)
summary(df_quant)
##      speed            height      
##  Min.   :  5.00   Min.   :  1.00  
##  1st Qu.: 45.00   1st Qu.:  6.00  
##  Median : 65.00   Median : 10.00  
##  Mean   : 65.72   Mean   : 11.41  
##  3rd Qu.: 85.00   3rd Qu.: 14.00  
##  Max.   :160.00   Max.   :145.00
library(corrplot)
## Warning: package 'corrplot' was built under R version 4.0.5
## corrplot 0.84 loaded
MCorr <- cor(df_quant)
corrplot(MCorr, method = "number")

Conclusão

A partir da base de dados pokémon, análisado com duas variáveis quantitativas.Na qual, foram utilizados a altura x peso.

No diagrama de despersão temos uma assosciação quantitativa linear fraca. Desta maneira, a interferência do peso correlacionado a altura não é muito significativa.Que por sua vez, se torna mais clara na matriz de correlação.

Percebe-se que é uma matriz simetrica e com 0,22 de correlação entra as quantitativas altura e peso.