[R-br] Regressão linear - Excluindo outliers
Fernando Souza
nandodesouza em gmail.com
Sexta Outubro 14 17:03:07 BRT 2016
Eu trabalho assim
#---------------------Analise de Cook's distance
-------------------------------------------
install.packages(sfsmisc); library(sfsmisc)
analise<-lm(CONSUMO~factor(GEST)*factor(MANEJO),data=agua)
n<-length(agua$CONSUMO) # número de observações
n.plot(cooks.distance(analise),seq(1:n),cex=.5,nam=agua$ANIMAL)
criterio<-4/analise$df.residual
abline(v=criterio)
#--------------------------------Eliminacao de
outiliers--------------------------------------
ifelse(cooks.distance(analise)>criterio,1,0)->agua$cook
analisecook<-lm(CONSUMO~factor(MANEJO)*factor(GEST),data=agua,subset=(cook==0
& GEST!=0 )) #eliminando outliers.
==================================
Fernando Souza
Zootecnista, DSc. Produção e Alimentação Animal
celular: (31)99796-8781 (Vivo) / (31)97358-4685 (Tim)
e-mail:nandodesouza em gmail.com
Lattes: http://lattes.cnpq.br/6519538815038307
blog: https://producaoanimalcomr.wordpress.com/
=================================
Em Sex, Out 14, 2016 em 3:52 , Walmes Zeviani via R-br
<r-br em listas.c3sl.ufpr.br> escreveu:
> Além da distância de Cook, você tem mais opções de medidas de
> influência com a inflence.measures(). Dê uma olhada aqui para ver
> exemplos
> http://leg.ufpr.br/~walmes/cursoR/mgest/1medidas-influen.html. Eu
> gosto de usar o DFits como medida.
>
> À disposição.
> Walmes.
>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20161014/d8ddab24/attachment.html>
Mais detalhes sobre a lista de discussão R-br