Não foi possível enviar o arquivo. Será algum problema com as permissões?
Essa é uma revisão anterior do documento!
Aula 17/06
Regressão Linear Simples
data(trees)
plot(trees)
##
## Regressão por mínimos quadrados
##
reg <- lm(Volume ~ Height, data=trees)
reg
## gráfico dos pontos e reta ajustada
with(trees, plot(Volume ~ Height))
abline(reg)
##
## Regressão L1 (mínimos módulos)
##
install.packages("quantreg", det=T)
require(qiantreg)
reg1 <- rq(Volume ~ Height, data=trees)
reg1
## adicionando a linha ajustada ao gráfico
abline(reg1, col=2)
