Aula7.2

R Markdown

library(readxl)

## Warning: package 'readxl' was built under R version 4.2.3

load("C:/Users/17988111701/Desktop/Base_de_dados-master/df_pokemon.RData")
View(df)

plot(df$attack, df$defense, 
main = "Gráfico 1 - diagrama de dispersão do ataque e defesa", xlab = "ataque do pokemon", ylab = "defesa", pch=20,col="black") 
abline(lsfit(df$attack,df$defense))

Hipótese verificada, quanto maior o ataque, maior será a defesa.

plot(df$hp,df$attack,
     main = "Gráfico 2 - diagrama de dispersão do HP e ataque",
     xlab = "HP do pokemon", ylab = "ataque", pch=20,col="red")
abline(lsfit(df$attack,df$defense),col="red")

plot(df$attack,df$speed,
main="Gráfico 3 - diagrama de dispersão do HP e ataque", xlab = "ataque", ylab = "velo", pch=20, col="blue")
abline(lsfit(df$attack,df$defense),col="darkblue", lwd=2)

Estatistica para verificação entre duas variáveis quantitativa e qualitativa

CORRELAÇÃO

Informações

1. ela é sempre um valor entre -1 e 1

2. valores próximos de zero indicam ausência de correlação

3. valores negativos indicam tendência negativa (situação 2)

4. valores positivos indicam relação positiva (situação 1)

cor(df$attack,df$defense)

## [1] 0.4317745

Relação

0.4317745

Correlação positiva (sinal) e moderada (número) entre ataque e defesa

cor(df$hp, df$attack)

## [1] 0.4298658

0.4298658

correlação positiva moderada

cor(df$attack,df$speed)

## [1] 0.3356615

0.3356615