class: center, middle, inverse, title-slide # Atividade 6 ## Diagrama de dispersão e Coeficiente de correlação ### Daniel Thomaz ### Unirio ### 21/04/2021 --- class: center, middle # Análise de duas variáveis quantitativas --- # Base de dados e bibliotecas ```r load("C:/Users/danie/Desktop/Base_de_dados-master/df_pokemon.RData") library(corrplot) library(dplyr) ``` --- class: center, middle # Diagrama de disperção das variáveis Ataque e HP dos pokemons --- ```r plot(df$hp,df$attack,pch=20,main = "Diagrama de dispersão",xlab = "HP",ylab = "Ataque") abline(lsfit(df$hp,df$attack),col= "darkred") ``` <!-- --> --- class: center, middle # Matriz de correlação --- ```r pokemon <- df %>% select(attack,hp) pokecorr <- cor(pokemon) corrplot(pokecorr,addCoef.col = TRUE,number.cex = 0.7) ``` <!-- --> --- # Conclusão As duas variáveis escolhidas foram ataque e hp(vida) dos pokemons. Analisando o diagrama de dispersão, podemos ver uma correlação positiva média, na medida que com o aumentar dos hp dos pokemons, o ataque vai aumentando tambem. A correlação entre as duas variáveis quantitativas indica uma associação positiva entre elas. A correlação é sempre um número entre -1 e 1. Podemos perceber que a correlação tem valor positivo de 0,43, com um grau entre fraco e médio de associação e indicado no gráfico pela cor azul.