<div>Maurício,</div><div><br></div><div>Vendo o que você postou... e consultando meu oráculo, posso suspeitar que o "erro" na sua ANOVA seja que ele está interpretando suas variáveis como numérica e não categóricas!</div>
<div><br></div><div>Note que isso é um erro de semântica e não sintaxe!</div><div><br></div><div>Para ver se é esse o caso, reporte-nos a saída do seus </div><div><br></div><div>> str(couto)</div><div><br></div><div>A afirmativa que esses efeitos estejam sendo interpretados como variáveis numéricas, proceda:</div>
<div><br></div><div>> couto <- transform(couto,</div><div>> AMB = factor(AMB),</div><div>> ... outras variáveis a transformar ... )</div><div><br></div><div>
Então proceda de novo sua anova pelo aov(), fica a sugestão de usar o terms('modelo', keep = TRUE) no argumento formula da função... se for o caso de obter somas de quadrados ajustadas!</div><div><br></div><div>OBS: Em outra ocasião que postar, leia antes o guia de postagem e produza um CMR, isso facilita para quem se disponibiliza a ajudar!</div>
<div><br></div><div>sem mais...</div><div><br></div><div>à disposição (parafrazeando Walmes),</div><div>FH</div><div><br></div><div><br></div>Faltou você transformar suas variáveis em fator<br><br><div class="gmail_quote">
2012/6/20 Mauricio Couto <span dir="ltr"><<a href="mailto:couto_estatistica@hotmail.com" target="_blank">couto_estatistica@hotmail.com</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div><div dir="ltr">
Pessoal.<br>
<br>
gostaria da ajuda de vocês para analisar um modelo de seleção recorrente no R, o problema são os efeitos aninhados com interação (R/AS). Necessito estimar os componentes de variância para estimar por exemplo a herdabilidade entre outros.<br>
<br>
Modelo estatístico:<br>
<p style="MARGIN:0cm 0cm 10pt" class="MsoNormal"><span style="FONT-FAMILY:Arial"><font size="3">Y<sub>ijkl</sub> = µ + A<sub>i</sub> + S<sub>j</sub> + AS<sub>ij</sub>+R/AS<sub>ijk</sub> +F/S<sub>jl</sub> + AS/S<sub>ijl</sub> + ε <sub>ijkl</sub><u></u><u></u><u></u></font></span></p>
<p style="MARGIN:0cm 0cm 10pt" class="MsoNormal"><span style="LINE-HEIGHT:115%;FONT-FAMILY:'Times New Roman';FONT-SIZE:12pt">μ é a média<u></u><u></u></span></p>
<p style="MARGIN:0cm 0cm 10pt" class="MsoNormal"><span style="LINE-HEIGHT:115%;FONT-FAMILY:'Times New Roman';FONT-SIZE:12pt">A<sub>i</sub> é o efeito do ambiente<u></u><u></u></span></p>
<p style="MARGIN:0cm 0cm 10pt" class="MsoNormal"><span style="LINE-HEIGHT:115%;FONT-FAMILY:'Times New Roman';FONT-SIZE:12pt">S<sub>j</sub> é o efeito de set<u></u><u></u></span></p>
<p style="MARGIN:0cm 0cm 10pt" class="MsoNormal"><span style="LINE-HEIGHT:115%;FONT-FAMILY:'Times New Roman';FONT-SIZE:12pt">AS<sub>ij</sub> é o efeito da interação ambiente e set<u></u><u></u></span></p>
<p style="MARGIN:0cm 0cm 10pt" class="MsoNormal"><span style="LINE-HEIGHT:115%;FONT-FAMILY:'Times New Roman';FONT-SIZE:12pt">R/AS<sub>ijk</sub> é o efeito da repetição dentro de ambiente e set<u></u><u></u></span></p>
<p style="MARGIN:0cm 0cm 10pt" class="MsoNormal"><span style="LINE-HEIGHT:115%;FONT-FAMILY:'Times New Roman';FONT-SIZE:12pt">F/S<sub>jl</sub> é o efeito da família dentro de set<u></u><u></u></span></p>
<p style="MARGIN:0cm 0cm 10pt" class="MsoNormal"><span style="LINE-HEIGHT:115%;FONT-FAMILY:'Times New Roman';FONT-SIZE:12pt">AF/S<sub>ijl</sub> é o efeito da interação ambiente e família dentro de set<u></u><u></u></span></p>
<p style="MARGIN:0cm 0cm 10pt" class="MsoNormal"><span style="LINE-HEIGHT:115%;FONT-FAMILY:'MS Mincho';FONT-SIZE:12pt">ɛ</span><sub><span style="LINE-HEIGHT:115%;FONT-FAMILY:'Times New Roman';FONT-SIZE:12pt">ijkl</span></sub><span style="LINE-HEIGHT:115%;FONT-FAMILY:'Times New Roman';FONT-SIZE:12pt"> é o erro experimental</span></p>
<p style="MARGIN:0cm 0cm 10pt" class="MsoNormal"><span style="LINE-HEIGHT:115%;FONT-FAMILY:'Times New Roman';FONT-SIZE:12pt"></span> </p>
<p style="MARGIN:0cm 0cm 10pt" class="MsoNormal"><span style="LINE-HEIGHT:115%;FONT-FAMILY:'Times New Roman';FONT-SIZE:12pt">Obs? Vejam como eu tentei fazer:</span></p><span style="LINE-HEIGHT:115%;FONT-FAMILY:'Times New Roman';FONT-SIZE:12pt">
<p style="MARGIN:0cm 0cm 10pt" class="MsoNormal"><span style="FONT-FAMILY:'Times New Roman'" lang="EN-US">> couto<-read.table("C:/Users/Mauricio/Desktop/SR.txt", h=T)</span></p><span style="FONT-FAMILY:'Times New Roman'" lang="EN-US">
<p style="MARGIN:0cm 0cm 10pt" class="MsoNormal"><span style="FONT-FAMILY:'Times New Roman'" lang="EN-US">>couto<-aov(CE~AMB*SET+REP/AMB*SET+Famílias/SET+AMB*Famílias/SET,data=couto)<u></u><u></u></span></p>
<u></u><u></u></span></span>
<p style="MARGIN:0cm 0cm 10pt" class="MsoNormal"><span style="FONT-FAMILY:'Times New Roman'" lang="EN-US"><font size="3">> summary(couto)<u></u><u></u></font></span></p>
Obs: só que a ANOVA saiu errada.<br>
<br>
Desde de já agradeço.<br>
<br>
<br>
<br><br> <br>
<p align="center"><font color="#008000"><strong>Mauricio Farias Couto</strong></font></p>
<p align="center"><strong><font color="#008000">Doutorando em Genética e Melhoramento de Plantas (UENF-RJ)</font></strong></p>
<p align="center"><strong><font color="#008000">Mestre em Estatística Aplicada e Biometria (UFV-MG)</font></strong></p>
<p align="center"><font color="#008000"><strong>Engº Agronomo (UESC-BA)</strong></font></p>
<p align="center"><font color="#008000"><strong></strong></font> </p>
<p align="center"><font color="#008000"><strong>Cel: <a href="tel:%2822%29%208117-3725" value="+552281173725" target="_blank">(22) 8117-3725</a></strong></font></p>
<p align="center"><strong><font color="#008000"> </font></strong></p>
<br> </div></div>
<br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div><br>