Boa noite a todos.

Estou replicando um exemplo de um livro que verifica a dependência entre o tempo de viagem(y) ~ número de entregas(x1) +número de milhas percorridas. Quando peço a anova no R.

anova(mod.cam), o R me dá a saída abaixo.

Analysis of Variance Table

Response: cam$tem_via
              Df  Sum Sq Mean Sq F value   Pr(>F)   
cam$n_entrega  1  9.0449  9.0449  27.535 0.001190 **
cam$milhas     1 12.5556 12.5556  38.222 0.000453 ***
Residuals      7  2.2994  0.3285                    
---
Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1


Eu gostaria da ANOVA com o Df da Regressão e do Resíduo, ou seja a anova reduzida.

Alguém poderia me indicar qual a função ou rotina para isso?

Em anexo o banco de dados em csv e a rotina.

[]' s
Edson Lira
Estatístico
Manaus-Amazonas