13.2 Variância (ANOVA)

Carregar a base de dados

vari<-read.csv("Pratica1.csv")

Executar a variância

anova=aov(Renda ~ Escolaridade, data = vari)

summary(anova)
##              Df    Sum Sq   Mean Sq F value   Pr(>F)    
## Escolaridade  2 3.611e+09 1.805e+09   70.98 2.24e-07 ***
## Residuals    12 3.052e+08 2.543e+07                     
## ---
## Signif. codes:  0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1

Criar gráfico de boxplot

ggplot(vari, aes(Escolaridade, Renda)) + 
  geom_boxplot()