class: center, middle, inverse, title-slide # Apresentação sobre duas variáveis quantitativas ## ⚔<br/>com o xaringan ### Mateus Francisco Silva do Nascimento ### UNIRIO ### 19/04/2021 --- --- class: center, middle # Análise de duas variáveis quantitativas ### Diagrama de disperção ### Coeficiente de correlação --- class: center, middle # Passo 1 - Carregando a base de dados: ```r load("C:/Users/mateu/Documents/R Project/Base_de_dados-master/df_pokemon.RData") ``` --- # Passo 2 - Carregando a biblioteca DPLYR e CORRPLOT ```r library(dplyr) ``` ``` ## ## 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 ``` ```r library(corrplot) ``` ``` ## Warning: package 'corrplot' was built under R version 4.0.5 ``` ``` ## corrplot 0.84 loaded ``` --- # Passo 3 - Resumo das variáveis ```r resumo <- df %>% summarise(media_be=mean(base_experience), media_at=mean(attack), dp_be=sd(base_experience), dp_at=sd(attack)) resumo ``` ``` ## # A tibble: 1 x 4 ## media_be media_at dp_be dp_at ## <dbl> <dbl> <dbl> <dbl> ## 1 142. 74.9 74.1 28.9 ``` --- # Passo 4 - Diagrama de disperção ```r par(bg="lightyellow") plot(df$attack, df$base_experience, pch=20,col="blue", main="Diagrama de Disperção", xlab = "Ataque", ylab = "Base de Experiência") abline(lsfit(df$attack, df$base_experience),col="firebrick") ``` <!-- --> --- # Passo 5 - Correlação e Matriz de Correlação ```r cor(df$base_experience, df$attack) ``` ``` ## [1] 0.5891011 ``` ```r df_atbe <- df %>% select(attack,base_experience) cor(df_atbe) ``` ``` ## attack base_experience ## attack 1.0000000 0.5891011 ## base_experience 0.5891011 1.0000000 ``` ```r Mcorr <- cor(df_atbe) ``` --- ```r corrplot(Mcorr, method="color") ``` <!-- --> --- # Conclusão ##### Conforme podemos observar no diagrama de disperção, podemos ver a linha vermelha, há uma inclinação moderada entre os pontos, então podemos dizer que entre as duas variáveis existe uma correlação positiva média. ##### E com a matriz de correlação, ficar mais evidente, a força da correlação entre as duas variáveis, onde é caracterizada como moderada, tendo um coeficiente de correlação no valor de 0.58.