Ops, falha minha... Li errado o help da função floor (e ainda achei estranho que a tradução de floor é piso)...<div><br></div><div>Sobre dividir por 365.25, sim, só funciona aproximadamente.</div><div><br></div><div>Valeu pela função, mais precisa que minha sugestão...</div>
<div><br></div><div>abç</div><div><br></div><div>M<br><br><div class="gmail_quote">2013/2/13 Rodrigo Coster <span dir="ltr"><<a href="mailto:rcoster@gmail.com" target="_blank">rcoster@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">Dividir por 365.25 nem sempre da certo. Pra isso aconselho usar uma função (como a que mando abaixo, que achei na internet e não me recordo aonde)<div><br></div><div><div> age_years <- function(first, second) { </div>
<div> lt <- data.frame(first, second) </div><div> age <- as.numeric(format(lt[,2],format="%Y")) - as.numeric(format(lt[,1],format="%Y")) </div><div> first <- as.Date(paste(format(lt[,2],format="%Y"),"-",format(lt[,1],format="%m-%d"),sep="")) </div>
<div> age[which(first > lt[,2])] <- age[which(first > lt[,2])] - 1 </div><div> age </div><div> }</div><div><br></div><div> data1 <- as.Date('28/02/2010','%d/%m/%Y')</div><div> data2 <- as.Date(c('28/02/2011','28/02/2012','28/02/2013','28/02/2014','28/02/2015'),'%d/%m/%Y')</div>
<div> </div><div> # Metodo 1</div><div> floor(as.numeric(data2 - data1)/365.25) # floor que arredonda para baixo, nao ceiling</div><div><br></div><div> # Metodo 2</div><div> age_years(data1,data2)</div></div><div><br>
</div></div><div class="HOEnZb"><div class="h5"><div class="gmail_extra"><br><br><div class="gmail_quote">2013/2/12 Fátima Lima Paula <span dir="ltr"><<a href="mailto:fatima.lima.paula@gmail.com" target="_blank">fatima.lima.paula@gmail.com</a>></span><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><font color="#993399"><font size="4"><font face="comic sans ms,sans-serif">Valeu, Manoel. Depois é só fazer idade=as.integer(idade), né?</font></font></font><div>
<font color="#993399"><font size="4"><font face="comic sans ms,sans-serif">Obrigada<br>
</font></font></font><br><div class="gmail_quote">Em 12 de fevereiro de 2013 19:22, Manoel Galdino <span dir="ltr"><<a href="mailto:mcz.fea@gmail.com" target="_blank">mcz.fea@gmail.com</a>></span> escreveu:<div><div>
<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
transforme em numeric e depois divida por 365.25.<br><br>Manoel<br> <span style="text-indent:0px;letter-spacing:normal;font-variant:normal;text-align:-webkit-left;font-style:normal;background-color:rgb(225,226,229);font-weight:normal;line-height:15px;border-collapse:separate;text-transform:none;font-size:13px;white-space:pre-wrap;font-family:'Lucida Console';word-spacing:0px"><pre style="font-family:'Lucida Console';font-size:10pt!important;outline-style:none;outline-width:initial;outline-color:initial;border-top-style:none;border-right-style:none;border-bottom-style:none;border-left-style:none;border-width:initial;border-color:initial;white-space:pre-wrap!important;margin-top:0px;margin-right:0px;margin-bottom:0px;margin-left:0px;line-height:1.2">
<span style="color:blue">as.numeric(idade)/365.25<br></span><br><span style="color:blue"><br></span></pre></span><br><br><br><div class="gmail_quote"><div><div>2013/2/12 Fátima Lima Paula <span dir="ltr"><<a href="mailto:fatima.lima.paula@gmail.com" target="_blank">fatima.lima.paula@gmail.com</a>></span><br>
</div></div><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><div><font color="#993399"><font size="4"><font face="comic sans ms,sans-serif">Olá pessoal, como passar a diferença entre datas (idade) em dias para anos? Já havia feito isso em algum lugar, mas não encontro.</font></font></font><div>
<font><font face="arial, helvetica, sans-serif">datanasc=c(19250405,19300809,19400402)</font></font></div><div><font><font face="arial, helvetica, sans-serif">dataint=c(20080302,20090506,20080104)</font></font></div><div>
<font><font face="arial, helvetica, sans-serif">datanasc=as.character(datanasc,"%Y%m%d")</font></font></div><div><font><div><font><font face="arial, helvetica, sans-serif">dataint=as.character(dataint,"%Y%m%d")</font></font></div>
<div><font><font face="arial, helvetica, sans-serif"><div>datanasc=as.Date(datanasc,"%Y%m%d")</div><div>dataint=as.Date(dataint,"%Y%m%d")</div><div>idade=dataint-datanasc</div><div>idade</div><div>Time differences in days</div>
<div><a href="tel:%5B1%5D%2030282%2028760" value="+13028228760" target="_blank">[1] 30282 28760</a> 24748</div><div><br></div></font></font></div></font></div><div><font color="#993399"><font size="4"><font face="comic sans ms,sans-serif">Agora preciso ter a idade de cada um em anos, com números inteiros.</font></font></font></div>
<div><font color="#993399"><font size="4"><font face="comic sans ms,sans-serif">Alguém pode me ajudar?</font></font></font></div><div><font color="#993399"><font size="4"><font face="comic sans ms,sans-serif">Obrigada</font></font></font></div>
<span><font color="#888888">
<div><font color="#993399"><font size="4"><font face="comic sans ms,sans-serif">Fátima</font></font></font></div><div><font color="#993399"><font size="4"><font face="comic sans ms,sans-serif"><div><br></div><div><br></div>
</font></font></font></div><div><font color="#993399"><font size="4"><font face="comic sans ms,sans-serif"><br></font></font></font></div>
</font></span><br></div></div>_______________________________________________<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.<span><font color="#888888"><br></font></span></blockquote>
</div><span><font color="#888888"><br><br clear="all"><br>-- <br>Manoel Galdino<br>
<a href="https://sites.google.com/site/galdinomcz/" target="_blank">https://sites.google.com/site/galdinomcz/</a><br>
</font></span><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></blockquote></div></div></div><br></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></blockquote></div><br></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>
Manoel Galdino<br><a href="https://sites.google.com/site/galdinomcz/" target="_blank">https://sites.google.com/site/galdinomcz/</a><br>
</div>