No primeiro caso indica que uma transformação log pode ser considerada (aceita a hipótese de que lambda==0).

m0 <- lm(Volume~log(Height)+log(Girth), data=trees)
par(mfrow=c(2,2))
plot(m0)
layout(1)

require(MASS)
boxcox(m0, lambda=seq(-0.25, 0.25, length=10))
abline(v=0, col=2)

m1 <- lm(log(Volume)~log(Height)+log(Girth), data=trees)
par(mfrow=c(2,2))
plot(m1)
layout(1)


À disposição.
Walmes.

==========================================================================
Walmes Marques Zeviani
LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W)
Departamento de Estatística - Universidade Federal do Paraná
fone: (+55) 41 3361 3573
VoIP: (3361 3600) 1053 1173
e-mail: walmes@ufpr.br
skype: walmeszeviani
twitter: @walmeszeviani
homepage: http://www.leg.ufpr.br/~walmes
linux user number: 531218
==========================================================================