<div dir="ltr">Eu resolvi assim:<div><br></div><div>x <- c(rep("1 ano(s)", 5), rep("10 ano(s)", 5), rep("11 ano(s)", 5), rep("12 ano(s)", 5), rep("13 ano(s)", 5), rep("14 ano(s)"))</div>

<div><br></div><div>as.numeric(sub(" ano\\(s\\)", "", x))<br></div><div><br></div><div>Abs,</div></div><div class="gmail_extra"><br><br><div class="gmail_quote">2014-04-22 16:48 GMT-03:00 FHRB Toledo <span dir="ltr"><<a href="mailto:fernandohtoledo@gmail.com" target="_blank">fernandohtoledo@gmail.com</a>></span>:<br>

<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr">Edson,<div><br></div><div>Acho que strsplit() pode ajudar!</div><div><br></div><div>Um pequeno exemplo:</div>

<div><br></div><div>vetorO é o seu vetor original; vetorF é o mesmo vetor como factor; e vetorN é o vetor numérico "transformado"</div>
<div><br></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></div><div>Espero ter ajudado!</div><div><br></div><div>att,<br></div><div>FH</div></div><div class="gmail_extra"><br><br><div class="gmail_quote"><div class="">2014-04-22 16:39 GMT-03:00 Edson Lira <span dir="ltr"><<a href="mailto:edinhoestat@yahoo.com.br" target="_blank">edinhoestat@yahoo.com.br</a>></span>:<br>


</div><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>Tenho a variável idade em um banco de dados da forma abaixo:<br>


<span></span></div><div><div class="h5"><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>


</span></div><div> <br>Quero retirar a palavra ano(s), transformando-a de fator para numérica<br><br>Olhei o help da ??stringsAsFactors, não consegui encontrar resposta.<br><br>[ ]'s.<span><font color="#888888"><br>
</font></span></div><span><font color="#888888"><div>Edson Lira<br>Estatístico<br>Manaus-Amazonas</div></font></span></div></div></div></div><br><div class="">_______________________________________________<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></div></blockquote></div><br></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>

<div dir="ltr">Marcus Nunes<br><a href="http://marcusnunes.me/" target="_blank">http://marcusnunes.me/</a><br></div>
</div>