<div dir="ltr">Resolvido.<div>Obrigado a todos que contribuíram dando suas sugestões.</div><div>Att...</div></div><div class="gmail_extra"><br><br><div class="gmail_quote">2014-04-10 21:54 GMT-03:00 Edson Lira <span dir="ltr"><<a href="mailto:edinhoestat@yahoo.com.br" target="_blank">edinhoestat@yahoo.com.br</a>></span>:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><div style="font-size:10pt;font-family:Courier New,courier,monaco,monospace,sans-serif"><div><span>Rodrigo, a rotina do Fernando é muito elegante, tem essa forma alternativa:</span></div>
<div class=""><div style="font-style:normal;font-size:13px;background-color:transparent;font-family:'Courier New',courier,monaco,monospace,sans-serif"><span><br></span></div><div style="margin-top:0px;margin-bottom:0px;font-family:'Helvetica Neue';color:rgb(7,26,153)">
<span style="color:#000000"> d </span><-<span style="color:#000000"> </span>data.frame(<span style="color:#000000">x1</span>=runif(<span style="color:#045218">10</span>),<span style="color:#000000"> x2</span>=as.factor(c(<span style="color:#b01600">'a'</span>,<span style="color:#b01600">'b'</span>)))</div>
<div style="margin-top:0px;margin-bottom:0px;font-family:'Helvetica Neue'"><span style="color:#071a99"> </span>d</div></div><div style="margin-top:0px;margin-bottom:0px;font-family:'Helvetica Neue';color:rgb(79,79,79)">
<span style="font-size:10pt;color:rgb(0,0,0)">d1</span><span style="color:rgb(7,26,153);font-size:10pt"><-subset(</span><span style="font-size:10pt;color:rgb(0,0,0)">d</span><span style="color:rgb(7,26,153);font-size:10pt">, </span><span style="font-size:10pt;color:rgb(0,0,0)">d</span><span style="color:rgb(7,26,153);font-size:10pt">$</span><span style="font-size:10pt;color:rgb(0,0,0)">x2 </span><span style="color:rgb(7,26,153);font-size:10pt">%</span><span style="font-size:10pt;color:rgb(195,136,9)">in</span><span style="color:rgb(7,26,153);font-size:10pt">% c(</span><span style="font-size:10pt;color:rgb(176,22,0)">"b"</span><span style="color:rgb(7,26,153);font-size:10pt">))</span><br>
</div><div style="margin-top:0px;margin-bottom:0px;font-family:'Helvetica Neue'">d1</div><div style="margin-top:0px;margin-bottom:0px;font-family:'Helvetica Neue'"></div><div style="text-indent:0px;letter-spacing:normal;font-variant:normal;text-align:start;font-style:normal;background-color:transparent;display:block;font-weight:normal;padding:0px;line-height:normal;text-transform:none;font-size:13px;white-space:normal;margin:0.1em 0px;font-family:'Courier New',courier,monaco,monospace,sans-serif;word-spacing:0px">
<span></span></div><div></div><div style="padding:0px;margin:0px;display:block;line-height:normal;font-size:13px;font-style:normal;font-variant:normal;font-weight:normal;letter-spacing:normal;text-align:start;text-indent:0px;text-transform:none;white-space:normal;word-spacing:0px;font-family:'Helvetica Neue';color:rgb(7,26,153)">
<br></div><div style="padding:0px;margin:0px;display:block;line-height:normal;font-size:13px;font-style:normal;font-variant:normal;font-weight:normal;letter-spacing:normal;text-align:start;text-indent:0px;text-transform:none;white-space:normal;word-spacing:0px;font-family:'Helvetica Neue';color:rgb(7,26,153);background-color:transparent">
table(<span style="color:rgb(0,0,0)">d1</span>$<span style="color:rgb(0,0,0)">x2</span>) # aparece b</div><div style="font-style:normal;font-size:13px;background-color:transparent;margin-bottom:0px;font-family:'Helvetica Neue';margin-top:0px">
<span style="color:rgb(7,26,153)">summary(</span>d1<span style="color:rgb(7,26,153)">$</span>x2<span style="color:rgb(7,26,153)">) </span><span style="color:rgb(7,26,153);font-size:10pt"># aparece b</span><br></div><div style="font-style:normal;font-size:13px;background-color:transparent;margin-bottom:0px;font-family:'Helvetica Neue';margin-top:0px">
<br></div><div style="font-style:normal;font-size:13px;background-color:transparent;margin-bottom:0px;font-family:'Helvetica Neue';margin-top:0px">d1<span style="color:#071a99">$</span>x2<span style="color:#071a99"><-</span>d1<span style="color:#071a99">$</span>x2<span style="color:#071a99">[</span>drop<span style="color:#071a99">=</span><span style="color:#c38809">T</span><span style="color:#071a99">] </span><span style="color:rgb(79,79,79);font-size:10pt">#informação do nível b é eliminada</span></div>
<div><span style="color:rgb(79,79,79);font-size:10pt"><br></span></div><div style="margin-top:0px;margin-bottom:0px;font-family:'Helvetica Neue';color:rgb(7,26,153)">table(<span style="color:#000000">d1</span>$<span style="color:#000000">x2</span>)</div>
<div style="background-color:transparent"><span>









</span></div><div style="margin-top:0px;margin-bottom:0px;font-family:'Helvetica Neue';color:rgb(7,26,153)">summary(<span style="color:#000000">d1</span>$<span style="color:#000000">x2</span>)</div><span class="HOEnZb"><font color="#888888"><div>
</div><div> </div><div>Edson Lira<br>Estatístico<br>Manaus-Amazonas</div></font></span><div style="display:block"><span class="HOEnZb"><font color="#888888"> </font></span><div style="font-family:'Courier New',courier,monaco,monospace,sans-serif;font-size:10pt">
<span class="HOEnZb"><font color="#888888"> </font></span><div style="font-family:HelveticaNeue,'Helvetica Neue',Helvetica,Arial,'Lucida Grande',sans-serif;font-size:12pt"><span class="HOEnZb"><font color="#888888"> <div dir="ltr">
 <font face="Arial"> Em Quinta-feira, 10 de Abril de 2014 20:32, Rodrigo Muniz <<a href="mailto:uenf.rodrigo@gmail.com" target="_blank">uenf.rodrigo@gmail.com</a>> escreveu:<br> </font> </div></font></span><div><div class="h5">
  <div><div><div dir="ltr">Obrigado Fernando, o problema era exatamente o que você relatou, utilizei o droplevels() e deu certo.<div>Desculpe não ter fornecido o CRM, como eu desconhecia
 totalmente a origem do problema, achei que fosse algo com o Rstudio ou mesmo ao windows e não aspectos de programação.</div>
<div>De qualquer forma agradeço</div><div>Att...</div></div><div><br><br><div>2014-04-10 18:56 GMT-03:00 FHRB Toledo <span dir="ltr"><<a rel="nofollow" href="mailto:fernandohtoledo@gmail.com" target="_blank">fernandohtoledo@gmail.com</a>></span>:<br>

<blockquote style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr">Rodrigo,<div><br></div><div>Faça o teste...</div><div><br></div><div>str(Carbono)</div><div><br></div><div>
Veja que ele vai ter dizer quantos níveis (levels) há para a sua variável "classe"!</div><div>
<br></div><div>Agora veja também o str(subset(Carbono, Carbono$calsse == 'arenosa'))</div><div><br></div><div>Você vai ver que o número de classe continua o mesmo, ou seja, o subset "herda" algumas informações do data.frame de origem!</div>


<div><br></div><div>Uma saída é usar droplevels() que vai retirar os níveis que não são usados do seu subset!</div><div><br></div><div>P.S.: Tudo que eu falei é apenas fruto de chute, intuição e algumas pitadas de adivinhação, visto que você não nos forneceu um CMR!</div>


<div><br></div><div>att,</div><div>FH</div></div><div><br><br><div>2014-04-10 16:49 GMT-05:00 Rodrigo Muniz <span dir="ltr"><<a rel="nofollow" href="mailto:uenf.rodrigo@gmail.com" target="_blank">uenf.rodrigo@gmail.com</a>></span>:<br>


<blockquote style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><div><div dir="ltr">Caros membros da lista, gostaria mais uma vez de solicitar a ajuda de vocês.<div>Estou tendo um problema, que não sei identificar o que é. </div>


<div>O problema é o seguinte:</div><div>Tenho um data frame 20 colunas chamado "Carbono", onde um das colunas é um fator identificando os tratamentos do experimento, e tenho um outra coluna com as classes texturais do solo. </div>



<div>Eu fiz uma análise por classe textural, então extraí um outro data frame chamado "Arenosa", utilizando a função "subset" somente para a classe arenosa, desta forma neste segundo data frame não há todos os tratamentos que estão presentes no data frame "Carbono". Porém qualquer gráfico que eu faça como por exemplo, plot(tapply(arenosa, arenosa$Tratamento, mean), aparece no gráfico todos os tratamentos do data frame "Carbono". </div>



<div>Esse é um exemplo, mas tenho tido problemas recorrentes referente a isto. Alguém tem alguma ideia do que possa ser? </div><div>A título de informação, meu sistema operacional é Windows 7 e eu utilizo o Rstudio.</div>



<div>Desde já agradeço...<span><font color="#888888"><br clear="all"><div><br></div>-- <br><b>Rodrigo A. Muniz</b><div>Eng. Agrônomo. Ms Produção Vegetal (UENF)</div><div>Doutorando em Engenharia de Sistemas Agrícolas (ESALQ/USP)</div>


<div>Cel (19) 8300-4333 (Pessoal)</div>
<div>Tel <a rel="nofollow">(19) 3375-1196</a> (Residêncial)</div><div>Tel <a rel="nofollow">(19) 3447-8537</a> (Trabalho)</div>


</font></span></div></div>
<br></div></div>_______________________________________________<br>
R-br mailing list<br>
<a rel="nofollow" href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a rel="nofollow" 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 rel="nofollow" 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>
<br>_______________________________________________<br>
R-br mailing list<br>
<a rel="nofollow" href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a rel="nofollow" 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 rel="nofollow" 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"><div>
<br></div>-- <br>
<b>Rodrigo A. Muniz</b><div>Eng. Agrônomo. Ms Produção Vegetal (UENF)</div><div>Doutorando em Engenharia de Sistemas Agrícolas (ESALQ/USP)</div><div>Cel (19) 8300-4333 (Pessoal)</div><div>Tel <a href="tel:%2819%29%203375-1196" value="+551933751196" target="_blank">(19) 3375-1196</a> (Residêncial)</div>

<div>Tel <a href="tel:%2819%29%203447-8537" value="+551934478537" target="_blank">(19) 3447-8537</a> (Trabalho)</div>
</div></div><br>_______________________________________________<br>R-br mailing list<br><a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">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><br></div>  </div></div></div> </div>  </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"><div><br></div>-- <br>
<b>Rodrigo A. Muniz</b><div>Eng. Agrônomo. Ms Produção Vegetal (UENF)</div><div>Doutorando em Engenharia de Sistemas Agrícolas (ESALQ/USP)</div><div>Cel (19) 8300-4333 (Pessoal)</div><div>Tel (19) 3375-1196 (Residêncial)</div>
<div>Tel (19) 3447-8537 (Trabalho)</div>
</div>