<html><body><div style="color:#000; background-color:#fff; font-family:Courier New, courier, monaco, monospace, sans-serif;font-size:10pt">Valeu FH!!!<br><div><span></span></div><div> </div><div>Edson Lira<br>Estatístico<br>Manaus-Amazonas</div><div><br></div> <div style="font-family: Courier New, courier, monaco, monospace, sans-serif; font-size: 10pt;"> <div style="font-family: HelveticaNeue, Helvetica Neue, Helvetica, Arial, Lucida Grande, sans-serif; font-size: 12pt;"> <div dir="ltr"> <hr size="1"> <font face="Arial" size="2"> <b><span style="font-weight:bold;">De:</span></b> FHRB Toledo <fernandohtoledo@gmail.com><br> <b><span style="font-weight: bold;">Para:</span></b> R-Br <r-br@listas.c3sl.ufpr.br>; Edson Lira <edinhoestat@yahoo.com.br> <br> <b><span style="font-weight: bold;">Enviadas:</span></b> Terça-feira, 22 de Abril de 2014 15:18<br> <b><span style="font-weight: bold;">Assunto:</span></b> Re: [R-br] Retirar
strings<br> </font> </div> <div class="y_msg_container"><br><div id="yiv1330614737"><div><div dir="ltr">Edson,<div><br clear="none"></div><div>Acho que strsplit() pode ajudar!</div><div><br clear="none"></div><div>Um pequeno exemplo:</div><div><br clear="none"></div><div>vetorO é o seu vetor original; vetorF é o mesmo vetor como factor; e vetorN é o vetor numérico "transformado"</div>
<div><br clear="none"></div><div><div>vetorO <- c('1 anos(s)', '10 anos(s)', '11 ano(s)', '12 ano(s)', '13 ano(s)', '14 ano(s)')</div><div>vetorF <- factor(vetorO)</div><div>vetorN <- as.numeric(do.call(rbind, strsplit(as.character(vetorF), split = ' ', fixed = TRUE))[,1])</div>
</div><div><br clear="none"></div><div>Espero ter ajudado!</div><div><br clear="none"></div><div>att,<br clear="none"></div><div>FH</div></div><div class="yiv1330614737gmail_extra"><br clear="none"><br clear="none"><div class="yiv1330614737gmail_quote">2014-04-22 16:39 GMT-03:00 Edson Lira <span dir="ltr"><<a rel="nofollow" shape="rect" ymailto="mailto:edinhoestat@yahoo.com.br" target="_blank" href="mailto:edinhoestat@yahoo.com.br">edinhoestat@yahoo.com.br</a>></span>:<br clear="none">
<blockquote class="yiv1330614737gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;"><div class="yiv1330614737yqt8074709735" id="yiv1330614737yqt44308"><div><div style="font-size:10pt;font-family:Courier New, courier, monaco, monospace, sans-serif;"><div>Tenho a variável idade em um banco de dados da forma abaixo:<br clear="none">
<span></span></div><div style="font-style:normal;font-size:13.3333px;background-color:transparent;font-family:Courier New, courier, monaco, monospace, sans-serif;"><span>1 ano(s) 10 ano(s) 11 ano(s) 12 ano(s) 13 ano(s) 14 ano(s) <br clear="none">
</span></div><div> <br clear="none">Quero retirar a palavra ano(s), transformando-a de fator para numérica<br clear="none"><br clear="none">Olhei o help da ??stringsAsFactors, não consegui encontrar resposta.<br clear="none"><br clear="none">[ ]'s.<span class="yiv1330614737HOEnZb"><font color="#888888"><br clear="none">
</font></span></div><span class="yiv1330614737HOEnZb"><font color="#888888"></font></span><div>Edson Lira<br clear="none">Estatístico<br clear="none">Manaus-Amazonas</div></div></div></div><br clear="none">_______________________________________________<br clear="none">
R-br mailing list<br clear="none">
<a rel="nofollow" shape="rect" ymailto="mailto:R-br@listas.c3sl.ufpr.br" target="_blank" href="mailto:R-br@listas.c3sl.ufpr.br">R-br@listas.c3sl.ufpr.br</a><br clear="none">
<a rel="nofollow" shape="rect" target="_blank" href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br clear="none">
Leia o guia de postagem (<a rel="nofollow" shape="rect" target="_blank" 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.<br clear="none"></blockquote></div><br clear="none"></div></div></div><br><br></div> </div> </div> </div></body></html>