<html>
<head>
<meta content="text/html; charset=utf-8" http-equiv="Content-Type">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<font face="Arial">Antes do estabelecimento de critérios empíricos
de corte para os valores da distância de Cook,<br>
há esse trabalho sobre sua distribuição exata:<br>
<br>
<a class="moz-txt-link-freetext" href="https://www.researchgate.net/publication/274062960_Exact_distribution_of_Cook%27s_distance_and_identification_of_influential_observations">https://www.researchgate.net/publication/274062960_Exact_distribution_of_Cook%27s_distance_and_identification_of_influential_observations</a><br>
<br>
</font>
<div class="moz-signature">FCosta<br>
<br>
<br>
</div>
<div class="moz-cite-prefix">Em 14/10/2016 17:03, Fernando Souza via
R-br escreveu:<br>
</div>
<blockquote cite="mid:1476475387.4123.0@smtp.gmail.com" type="cite">
<div>Eu trabalho assim</div>
#---------------------Analise de Cook's distance
-------------------------------------------
<div>install.packages(sfsmisc); library(sfsmisc)<br>
<div>analise<-lm(CONSUMO~factor(GEST)*factor(MANEJO),data=agua)<br>
<div>n<-length(agua$CONSUMO) # número de observações</div>
<div>n.plot(cooks.distance(analise),seq(1:n),cex=.5,nam=agua$ANIMAL)</div>
<div>criterio<-4/analise$df.residual</div>
<div>abline(v=criterio)</div>
<div>#--------------------------------Eliminacao de
outiliers--------------------------------------</div>
<div>ifelse(cooks.distance(analise)>criterio,1,0)->agua$cook</div>
<div>analisecook<-lm(CONSUMO~factor(MANEJO)*factor(GEST),data=agua,subset=(cook==0
& GEST!=0 )) #eliminando outliers.<br>
==================================<br>
Fernando Souza<br>
Zootecnista, DSc. Produção e Alimentação Animal<br>
celular: (31)99796-8781 (Vivo) / (31)97358-4685 (Tim)<br>
<a class="moz-txt-link-abbreviated" href="mailto:e-mail:nandodesouza@gmail.com">e-mail:nandodesouza@gmail.com</a><br>
Lattes: <a moz-do-not-send="true"
href="http://lattes.cnpq.br/6519538815038307">http://lattes.cnpq.br/6519538815038307</a><br>
blog: <a moz-do-not-send="true"
href="https://producaoanimalcomr.wordpress.com/">https://producaoanimalcomr.wordpress.com/</a><br>
=================================
<br>
<br>
Em Sex, Out 14, 2016 em 3:52 , Walmes Zeviani via R-br
<a class="moz-txt-link-rfc2396E" href="mailto:r-br@listas.c3sl.ufpr.br"><r-br@listas.c3sl.ufpr.br></a> escreveu:<br>
<blockquote type="cite">
<div dir="ltr">
<div class="gmail_default" style="font-family:trebuchet
ms,sans-serif">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 <a moz-do-not-send="true"
href="http://leg.ufpr.br/%7Ewalmes/cursoR/mgest/1medidas-influen.html">http://leg.ufpr.br/~walmes/cursoR/mgest/1medidas-influen.html</a>.
Eu gosto de usar o DFits como medida.<br>
<br>
</div>
<div class="gmail_default" style="font-family:trebuchet
ms,sans-serif">À disposição.<br>
</div>
<div class="gmail_default" style="font-family:trebuchet
ms,sans-serif">Walmes.<br>
</div>
</div>
</blockquote>
</div>
</div>
</div>
<br>
<fieldset class="mimeAttachmentHeader"></fieldset>
<br>
<pre wrap="">_______________________________________________
R-br mailing list
<a class="moz-txt-link-abbreviated" href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a>
<a class="moz-txt-link-freetext" href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a>
Leia o guia de postagem (<a class="moz-txt-link-freetext" href="http://www.leg.ufpr.br/r-br-guia">http://www.leg.ufpr.br/r-br-guia</a>) e forne�a c�digo m�nimo reproduz�vel.</pre>
</blockquote>
<br>
</body>
</html>