$$SS_{total} = \sum_{i=1}^n (y_{i} - \bar{y})^2$$
$$SS_{error} = \sum_{i=1}^n (y_{i} - \hat{y})^2$$
$$SS_{total} = SS_{regr} + SS_{erro} $$
Para o cálculo dos parâmetros da reta use as funções do Excell:
INCLINAÇÂO
INTERCEPÇẪO
lmdummy <- lm(colhe ~ dummy1 + dummy2 + dummy3 , data = colheitaDummy) ## avalie o modelo summary(lmdummy) anova(lmdummy)
lmAnova <- lm(colhe~solo, data=colheita) ## avalie o modelo summary(lmAnova) anova(lmAnova)