É só questão de entrar com o x certo, tem que colocar entre aspas o valor (string)<div><span class="Apple-style-span" style="border-collapse: collapse; color: rgb(51, 51, 51); font-family: Arial; "><br></span></div><div>x='21/04/87'<div>
<div>(c(Sys.Date() - as.Date(gsub("(\\d{2})$", "19\\1", x), "%d/%m/%Y")) /365.25) %/% 1</div><div>[1] 24</div><div><br></div><div>Se quiser fugir de expressão regular, da pra fazer assim:</div>
<div><br></div>x='21/04/87'<div>as.real((Sys.Date() - as.Date(x,'%d/%m/%y'))/365.25) %/% 1</div><div>[1] 24</div><div><br></div><div><br></div><div class="gmail_quote">2011/4/25 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;">
<div bgcolor="#ffffff">
<div><font face="Arial" size="2">Obrigado pelo retorno, mas não foi bem isso, eu
transformar 21/04/87 no número de anos até hoje, e </font></div>
<div><font face="Arial" size="2">alguém deu a sugestão que não consegui
implementar </font></div><div class="im">
<div><font face="Arial" size="2">x=21/04/87<br>(c(Sys.Date() - as.Date(gsub("(<a>\\d{2})$</a>", "19\\1", x), "%d/%m/%Y")) /365.25) %/%
1</font></div>
<div>
<div><font face="Arial" size="2">[1] NA</font></div><font face="Arial" size="2"></font></div>
</div><div class="im"><div><font face="Arial" size="2">
<div>Mauro, tenta assim:</div>
<div><br></div>
<div>x='21/04/87'</div>format(as.Date(x,'%d/%m/%y'),'%Y')
<div>[1] "1987"</div>
<div>
<div>format(as.Date(x,'%d/%m/%y'),'%y')</div>
<div>[1] "87"</div></div></font></div>
<div><font face="Arial" size="2"> </font></div>
<div><br></div>
<blockquote style="padding-right:0px;padding-left:5px;margin-left:5px;border-left:#000000 2px solid;margin-right:0px">
<div><font face="Arial" size="2"></font> </div></blockquote></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>
<br></blockquote></div><br></div></div>