<html>
<head>
<meta content="text/html; charset=ISO-8859-1"
http-equiv="Content-Type">
</head>
<body text="#000000" bgcolor="#FFFFFF">
Boa noite Wirton,<br>
<br>
Vejo problemas com o seu modelo:<br>
Em summary(g0), o Residual deviance: 431.11 on 36 degrees of
freedom esta com sobre dispersão e se fizer plot(m0),
especificamente no gráfico Normal Q-Q versus Desvio padrão residual
vera que o ajuste não ficou bom. Veja também que sua variável
resposta da$y são dados contínuos e não discretos e não existe 0 na
distribuição de Poisson.<br>
<br>
Abraço,<br>
<br>
<pre class="moz-signature" cols="72">--
======================================================================
Alexandre dos Santos
Proteção Florestal
Coordenador do curso Técnico em Florestas
Vice Coordenador do curso de Engenharia Florestal
IFMT - Instituto Federal de Educação, Ciência e Tecnologia de Mato Grosso
Campus Cáceres
Caixa Postal 244
Avenida dos Ramires, s/n
Bairro: Distrito Industrial
Cáceres - MT CEP: 78.200-000
Fone: (+55) 65 8132-8112 (TIM) (+55) 65 9686-6970 (VIVO)
<a class="moz-txt-link-abbreviated" href="mailto:e-mails:alexandresantosbr@yahoo.com.br">e-mails:alexandresantosbr@yahoo.com.br</a>
<a class="moz-txt-link-abbreviated" href="mailto:alexandre.santos@cas.ifmt.edu.br">alexandre.santos@cas.ifmt.edu.br</a>
======================================================================</pre>
<br>
<br>
<div class="moz-cite-prefix">Em 23/06/2013 20:08, Wirton Macedo
Coutinho escreveu:<br>
</div>
<blockquote
cite="mid:1372032519.33869.YahooMailNeo@web124702.mail.ne1.yahoo.com"
type="cite">
<div style="color:#000; background-color:#fff; font-family:Courier
New, courier, monaco, monospace, sans-serif;font-size:10pt">
<div style="font-family: 'Courier New', courier, monaco,
monospace, sans-serif; font-size: 10pt;">Boa noite a todos,</div>
<div style="font-family: 'Courier New', courier, monaco,
monospace, sans-serif; font-size: 10pt;"><br>
</div>
<div style="font-family: 'Courier New', courier, monaco,
monospace, sans-serif; font-size: 13px; color: rgb(0, 0, 0);
background-color: transparent; font-style: normal;">Tenho um
conjunto de dados em arranjo fatorial que não atendem as
pressuposições de normalidade e homocesdacidade de variâncias.
Para contornar esse problema, optei por fazer a análise do
mesmo por GLM; no entanto,como houve efeito significativo da
interação, fiquei na dúvida de como proceder para fazer o
desdobramento e fazer comparações múltiplas entre os
tratamentos.</div>
<div style="font-family: 'Courier New', courier, monaco,
monospace, sans-serif; font-size: 13px; color: rgb(0, 0, 0);
background-color: transparent; font-style: normal;"><br>
</div>
<div style="font-family: 'Courier New', courier, monaco,
monospace, sans-serif; font-size: 13px; color: rgb(0, 0, 0);
background-color: transparent; font-style: normal;">Pesquisando
na internet, encontrei um post que recomendava fazê-lo por
meio de constrastes utilizando o pacote multcomp. Assim o fiz
(como vcs podem conferir pelo código abaixo). No entanto, como
migrei recentemente para o R, surgiu a dúvida se isso que fiz
está correto ou não. Assim, gostaria da opinião de vcs sobre o
código ou se tem uma outra forma de fazê-lo.</div>
<div style="font-family: 'Courier New', courier, monaco,
monospace, sans-serif; font-size: 13px; color: rgb(0, 0, 0);
background-color: transparent; font-style: normal;"><br>
</div>
<div style="font-family: 'Courier New', courier, monaco,
monospace, sans-serif; font-size: 13px; color: rgb(0, 0, 0);
background-color: transparent; font-style: normal;"><br>
</div>
<div style="background-color: transparent;">
<div style="background-color: transparent;"><font size="2"
face="Courier New, courier, monaco, monospace, sans-serif">da
<- expand.grid(rep=1:4, isol=factor(1:6),
cult=factor(1:2))</font></div>
<div style="background-color: transparent;"><font size="2"
face="Courier New, courier, monaco, monospace, sans-serif">da$y
<- c(4.5, 25.5, 8.5, 12, 123, 19.5, 111.5, 83.5, 10, 4,
4.5,</font></div>
<div style="background-color: transparent;"><font size="2"
face="Courier New, courier, monaco, monospace, sans-serif">
90.5, 46.5, 61.5, 20.5, 33.5, 47.5, 39, 131.5,
68.5, 4,</font></div>
<div style="background-color: transparent;"><font size="2"
face="Courier New, courier, monaco, monospace, sans-serif">
10, 13.5, 10, 9, 0, 0, 0, 2, 0, 0, 0, 0, 12.5,
4.5, 6.5,</font></div>
<div style="background-color: transparent;"><font size="2"
face="Courier New, courier, monaco, monospace, sans-serif">
1, 0, 0, 1, 0, 0, 0.5, 0, 2, 2, 0.5, 0.5)</font></div>
<div style="background-color: transparent;"><font size="2"
face="Courier New, courier, monaco, monospace, sans-serif"><br>
</font></div>
<div style="background-color: transparent;"><font size="2"
face="Courier New, courier, monaco, monospace, sans-serif">g0
<- glm(y~isol + cult + isol:cult, family=poisson,
data=da)</font></div>
<div style="background-color: transparent;"><font size="2"
face="Courier New, courier, monaco, monospace, sans-serif">summary(g0)</font></div>
<div style="background-color: transparent;"><font size="2"
face="Courier New, courier, monaco, monospace, sans-serif">anova(g0,
test="Chisq")</font></div>
<div style="background-color: transparent;"><font size="2"
face="Courier New, courier, monaco, monospace, sans-serif"><br>
</font></div>
<div style="background-color: transparent;"><font size="2"
face="Courier New, courier, monaco, monospace, sans-serif">isolcult
<- interaction(da$isol, da$cult, drop=TRUE)</font></div>
<div style="background-color: transparent;"><font size="2"
face="Courier New, courier, monaco, monospace, sans-serif">m0
<- glm(da$y~isolcult, family=poisson)</font></div>
<div style="background-color: transparent;"><font size="2"
face="Courier New, courier, monaco, monospace, sans-serif">require(multcomp)</font></div>
<div style="background-color: transparent;"><font size="2"
face="Courier New, courier, monaco, monospace, sans-serif">glht.m0
<- glht(m0, mcp(isolcult = "Tukey"))</font></div>
<div style="background-color: transparent;"><font size="2"
face="Courier New, courier, monaco, monospace, sans-serif">summary(glht.m0)</font></div>
<div style="background-color: transparent; color: rgb(0, 0,
0); font-size: 13px; font-family: 'Courier New', courier,
monaco, monospace, sans-serif; font-style: normal;"><font
size="2" face="Courier New, courier, monaco, monospace,
sans-serif"><br>
</font></div>
<div style="background-color: transparent; color: rgb(0, 0,
0); font-size: 13px; font-family: 'Courier New', courier,
monaco, monospace, sans-serif; font-style: normal;"><font
size="2" face="Courier New, courier, monaco, monospace,
sans-serif"><br>
</font></div>
<div style="background-color: transparent; color: rgb(0, 0,
0); font-size: 13px; font-family: 'Courier New', courier,
monaco, monospace, sans-serif; font-style: normal;"><font
size="2" face="Courier New, courier, monaco, monospace,
sans-serif">
<div style="font-size: 13px;">Certo de contar com a boa
vontade de todos, agradeço antecipadamente.</div>
<div style="font-size: 13px;"><br>
</div>
<div style="font-size: 13px;">Att.,</div>
<div style="font-size: 13px;"><br>
</div>
<div style="font-size: 13px;">--</div>
<div style="font-size: 13px;">Wirton Macedo Coutinho</div>
<div style="font-size: 13px;">Pesquisador Fitopatologia</div>
<div style="font-size: 13px;">Embrapa Algodão</div>
<div style="font-size: 13px;">Rua Oswaldo Cruz, 1143,
Centenário</div>
<div style="font-size: 13px;">Campina Grande PB</div>
<div style="font-size: 13px;">CEP 28428-095</div>
</font></div>
</div>
<div style="font-family: 'Courier New', courier, monaco,
monospace, sans-serif; font-size: 13px; color: rgb(0, 0, 0);
background-color: transparent; font-style: normal;"> </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>
<pre class="moz-signature" cols="72">
</pre>
</body>
</html>