Mauro, agricolae é o pacote. A função HSD.test() poderá ser encontrada nela.<br><br>att<br><br>Peternelli<br><br><div class="gmail_quote">2011/9/20 Mauro Sznelwar <span dir="ltr"><<a href="mailto:sznelwar@uol.com.br">sznelwar@uol.com.br</a>></span><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;"><u></u>
<div bgcolor="#ffffff">
<div align="justify"><font color="#0000ff" face="Arial">Estava olhando a discussão, e
não consegui rodar esta função agricolae! De que pacote ela é?</font></div><div><div></div><div class="h5">
<blockquote style="padding-right:0px;padding-left:5px;margin-left:5px;border-left:#000000 2px solid;margin-right:0px"><font face="Arial" size="2"></font>
<div><br></div><font face="trebuchet ms,sans-serif">Se for balanceado, use a
função agricolae::HSD.test() que solta essa estimativa na saída da função,
veja<br><br><span style="font-family:courier new,monospace">> x <-
gl(5,5)</span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">> y <- rnorm(x)</span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">> agricolae::HSD.test(y, x,
DFerror=20, MSError=1)</span><br style="font-family:courier new,monospace"><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">Study:</span><br style="font-family:courier new,monospace">
<br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">HSD Test for y </span><br style="font-family:courier new,monospace"><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">Mean Square Error: 1
</span><br style="font-family:courier new,monospace"><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">x, means</span><br style="font-family:courier new,monospace"><br style="font-family:courier new,monospace">
<span style="font-family:courier new,monospace">
y std.err replication</span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">1 -0.3230810
0.1327155
5</span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">2 0.3595503
0.5492514
5</span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">3 -0.1703578
0.3377758
5</span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">4 -0.1483504
0.5129000
5</span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">5 -0.1101464
0.2727455
5</span><br style="font-family:courier new,monospace"><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">alpha: 0.05 ; Df Error: 20
</span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">Critical Value of Studentized
Range: 4.231857 </span><br style="font-family:courier new,monospace"><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">Honestly Significant Difference:
1.892544 <------------------------------------------ DMS</span><br style="font-family:courier new,monospace"><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">Means with the same letter are not
significantly different.</span><br style="font-family:courier new,monospace"><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">Groups, Treatments and
means</span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">a 2
0.3595503 </span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">a 5
-0.1101464 </span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">a 4
-0.1483504 </span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">a 3
-0.1703578 </span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">a 1
-0.323081 </span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">> </span><br style="font-family:courier new,monospace"><br clear="all"></font><span style="font-family:trebuchet ms,sans-serif">==========================================================================</span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">Walmes Marques Zeviani</span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">LEG (Laboratório de Estatística e
Geoinformação, 25.450418 S, 49.231759 W)</span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">Departamento de Estatística -
Universidade Federal do Paraná</span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">fone: (+55) 41 3361
3573</span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">VoIP: (3361 3600) 1053
1173</span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">e-mail: <a href="mailto:walmes@ufpr.br" target="_blank">walmes@ufpr.br</a></span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">twitter: @walmeszeviani</span><br style="font-family:trebuchet ms,sans-serif"><span style="font-family:trebuchet ms,sans-serif">homepage: <a href="http://www.leg.ufpr.br/%7Ewalmes" target="_blank">http://www.leg.ufpr.br/~walmes</a></span><br style="font-family:trebuchet ms,sans-serif">
<span style="font-family:trebuchet ms,sans-serif">linux user number:
531218</span><br style="font-family:trebuchet ms,sans-serif"></blockquote></div></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><br clear="all"><br>-- <br>*****************************************************************<br>
<div style="display:inline"></div>Prof. Luiz A. Peternelli, Professor Associado II<br>Departamento de Estatística<br>Universidade Federal de Vicosa (UFV)<br>Vicosa, MG, Brasil, 36570-000<br>55 (31) 3899-1787 - <a href="http://www.det.ufv.br/%7Epeternelli" target="_blank">http://www.det.ufv.br/~peternelli</a><br>
*****************************************************************<br>
<div style="visibility: hidden; left: -5000px; position: absolute; z-index: 9999; padding: 0px; margin-left: 0px; margin-top: 0px; overflow: hidden; word-wrap: break-word; color: black; font-size: 10px; text-align: left; line-height: 130%;" id="avg_ls_inline_popup">
</div>