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: wal...@ufpr.br
skype: walmeszeviani
twitter: @walmeszeviani
homepage: http://www.leg.ufpr.br/~walmes
linux user number: 531218
==========================================================================
_______________________________________________
R-br mailing list
R-br@listas.c3sl.ufpr.br
https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código 
mínimo reproduzível.

Responder a