<div dir="ltr"><div>Odirley e Walmes, boa tarde!</div><div><br></div><div>Pelo que entendi o reorder() reordena os níveis (x) em função da resposta (y). Na proposta que segue, sugiro reordenar os níveis diretamente, informando a ordem desejada.</div><div><br></div><div><span style="font-family:monospace,monospace">### objeto "trt" montado de forma a reproduzir o ranking informado inicialmente</span><br></div><div><font face="monospace, monospace">trt    <- factor(c(0,120,180,30,60,0,120,180,30,60,0,120,180,30,60), labels=c(0,120,180,30,60))</font></div><div><font face="monospace, monospace">rank(trt)</font></div><div><font face="monospace, monospace">str(trt)</font></div><div><font face="monospace, monospace">#  Factor w/ 5 levels "0","120","180",..: 1 4 5 2 3 1 4 5 2 3 ...</font></div><div><font face="monospace, monospace"><br></font></div><div><font face="monospace, monospace">trt2 <- factor(trt, c("0", "30", "60", "120", "180"))</font></div><div><font face="monospace, monospace">str(trt2)</font></div><div><font face="monospace, monospace">#  Factor w/ 5 levels "0","30","60",..: 1 2 3 4 5 1 2 3 4 5 ...</font></div><div><font face="monospace, monospace"><br></font></div><div><font face="monospace, monospace">### Testando com as médias informadas</font></div><div><font face="monospace, monospace">medias <- c(13.520,20.334,23.926,25.308,25.390,15.712,22.570,28.692,28.760,29.786,16.090,20.988,29.828,35.908,37.146) </font></div><div><font face="monospace, monospace"><br></font></div><div><font face="monospace, monospace">data.frame(trt, medias, trt2) ### aparentemente iguais, mas com diferença na ordenação dos níveis!</font></div><div><font face="monospace, monospace"><br></font></div><div><font face="monospace, monospace">par(mfcol=c(1,2))</font></div><div><font face="monospace, monospace">plot(medias~trt)</font></div><div><font face="monospace, monospace">plot(medias~trt2)</font></div><div><img src="cid:ii_14c71045d841c1ce" alt="Imagem inline 1" width="519" height="352" style="font-family: monospace, monospace;"><br></div><div class="gmail_extra"><br clear="all"><div><div class="gmail_signature"><div dir="ltr">Éder Comunello <<a href="mailto:comunello.eder@gmail.com" target="_blank">c</a><a href="mailto:omunello.eder@gmail.com" target="_blank">omunello.eder@gmail.com</a>> <br>Dourados, MS - [22 16.5'S, 54 49'W]<br></div></div></div>
<br><div class="gmail_quote">Em 31 de março de 2015 11:29, walmes . <span dir="ltr"><<a href="mailto:walmeszeviani@gmail.com" target="_blank">walmeszeviani@gmail.com</a>></span> escreveu:<br><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex"><div dir="ltr"><div style="font-family:'trebuchet ms',sans-serif">Pelo que entendi, reorder() é o que você precisa usar.<br><br><span style="font-family:monospace,monospace">## 5 níveis, 4 repetições.<br>trt <- gl(5, 4)<br><br>## Resposta.<br>y <- rnorm(length(trt))<br><br>boxplot(y~trt)<br><br>## Fazer os níveis ordenados pelas médias.<br>trt0 <- reorder(x=trt, y, FUN=mean)<br><br>boxplot(y~trt0)<br></span><br>À disposição.<span class=""><font color="#888888"><br></font></span></div><span class=""><font color="#888888"><div style="font-family:'trebuchet ms',sans-serif">Walmes.<br></div><div style="font-family:'trebuchet ms',sans-serif"></div><br></font></span></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></div></div>