<div dir="ltr"><div class="gmail_default" style="font-family:'courier new',monospace;color:rgb(0,0,102)">Valeu pessoal, agradeço muito. Eu não tenho um tempo pra testar de imediato e dar um retorno mas quando eu conseguir eu posto aqui se serviu ou não.</div>
<div class="gmail_default" style="font-family:'courier new',monospace;color:rgb(0,0,102)"><br></div><div class="gmail_default" style="font-family:'courier new',monospace;color:rgb(0,0,102)">Abraço forte e que a força esteja sempre com voces. </div>
</div><div class="gmail_extra"><br clear="all"><div><div dir="ltr"><font face="'courier new', monospace" style="background-color:rgb(255,255,255)" color="#000066">Dr. Pedro Emmanuel A. A. do Brasil</font><div><span style="color:rgb(0,0,102);font-family:'courier new',monospace"><a href="http://blog.ipec.fiocruz.br/lapclin-chagas/">http://blog.ipec.fiocruz.br/lapclin-chagas/</a></span><font face="'courier new', monospace" style="background-color:rgb(255,255,255)" color="#000066"><br>
</font></div><div><font face="'courier new', monospace" style="background-color:rgb(255,255,255)" color="#000066">Curriculum Lattes:
<span style="text-align:left"><a href="http://lattes.cnpq.br/6597654894290806" target="_blank">http://lattes.cnpq.br/6597654894290806</a></span></font></div><div><font face="'courier new', monospace" style="background-color:rgb(255,255,255)" color="#000066">ResearchGate.net: <a href="https://www.researchgate.net/profile/Pedro_Brasil2/" target="_blank">https://www.researchgate.net/profile/Pedro_Brasil2/</a><br>
</font></div><div style><span style="color:rgb(0,0,102);font-family:'courier new',monospace">Instituto Nacional de Infectologia/Instituto de Pesquisa Clínica Evandro Chagas</span><br></div><div><font face="'courier new', monospace" style="background-color:rgb(255,255,255)" color="#000066">Fundação Oswaldo Cruz<br>
Rio de Janeiro - Brasil<br>Av. Brasil 4365, <br>CEP 21040-360,<br>Tel 55 21 3865-9648<br>e-mail: <a href="mailto:pedro.brasil@ipec.fiocruz.br" target="_blank">pedro.brasil@ipec.fiocruz.br</a><br>e-mail: <a href="mailto:emmanuel.brasil@gmail.com" target="_blank">emmanuel.brasil@gmail.com</a><br>
<br>---Apoio aos softwares livres<br><a href="http://www.zotero.org" target="_blank">www.zotero.org</a> - gerenciamento de referências bibliográficas. <br><a href="http://www.broffice.org" target="_blank">www.broffice.org</a> ou <a href="http://www.libreoffice.org/" target="_blank">www.libreoffice.org</a> - textos, planilhas ou apresentações.<br>
<a href="http://www.epidata.dk" target="_blank">www.epidata.dk</a> - entrada de dados.<br><a href="http://www.r-project.org" target="_blank">www.r-project.org</a> - análise de dados.<br><a href="http://www.ubuntu.com" target="_blank">www.ubuntu.com</a> - sistema operacional</font></div>
</div></div>
<br><br><div class="gmail_quote">Em 23 de maio de 2013 08:52, Rodrigo Coster <span dir="ltr"><<a href="mailto:rcoster@gmail.com" target="_blank">rcoster@gmail.com</a>></span> escreveu:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div dir="ltr">Apenas corrigindo (em negrito o que acrescentei) a função do Davi:<div><br></div><div><div class="im"><p style="font-family:arial,sans-serif;font-size:13px"><span style="font-size:11pt;font-family:Arial,sans-serif">area <-function(lims,prec){<br>
x<-seq(lims[1],lims[2],prec)<u></u><u></u></span></p></div><p style="font-family:arial,sans-serif;font-size:13px"><span lang="EN-US" style="font-size:11pt;font-family:Arial,sans-serif">resp <- sum(x^2) / length(x)* <b>(lims[2] - lims[1])</b><u></u></span></p>
<p style="font-family:arial,sans-serif;font-size:13px"><span lang="EN-US" style="font-size:11pt;font-family:Arial,sans-serif">return(resp)<u></u><u></u></span></p><p style="font-family:arial,sans-serif;font-size:13px">
<span style="font-size:11pt;font-family:Arial,sans-serif">}</span></p></div></div><div class="gmail_extra"><br><br><div class="gmail_quote">2013/5/22 Davi Butturi-Gomes <span dir="ltr"><<a href="mailto:davi.butturi@gmail.com" target="_blank">davi.butturi@gmail.com</a>></span><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><div class="h5">
<div lang="PT-BR" link="blue" vlink="purple">
<div>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Arial","sans-serif"">Ah,
vc pode fazer o seguinte no R:<br>
<br>
#escolher os limites da integral<br>
limsteste <- c(0,1)<br>
<br>
<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Arial","sans-serif"">#escolher
a “precisão” numérica<br>
precteste <- 0.0001<br>
<br>
#escolher a função, por exemplo, x^2.<br>
area <-function(lims,prec){<br>
x<-seq(lims[1],lims[2],prec)<u></u><u></u></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Arial","sans-serif"">resp
<- sum(x^2) / length(x)<u></u><u></u></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:11.0pt;font-family:"Arial","sans-serif"">return(resp)<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Arial","sans-serif"">}<br>
<br>
<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Arial","sans-serif"">area(limsteste,precteste)<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Arial","sans-serif""><u></u> <u></u></span></p>
<p class="MsoNormal"><b><span style="font-family:"Cambria Math","serif"">____________________<u></u><u></u></span></b></p>
<p class="MsoNormal"><b><span style="font-family:"Cambria Math","serif"">MSc.
Davi Butturi-Gomes<br>
</span></b><span style="font-size:11.0pt;font-family:"Cambria Math","serif"">ESALQ-USP<u></u><u></u></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Cambria Math","serif""><a href="mailto:davibg@usp.br" target="_blank">davibg@usp.br</a></span><b><span style="font-family:"Cambria Math","serif""><u></u><u></u></span></b></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:"Arial","sans-serif""><u></u> <u></u></span></p>
<div style="border:none;border-top:solid #b5c4df 1.0pt;padding:3.0pt 0cm 0cm 0cm">
<p class="MsoNormal"><b><span style="font-size:10.0pt;font-family:"Tahoma","sans-serif"">De:</span></b><span style="font-size:10.0pt;font-family:"Tahoma","sans-serif""> R-br
[mailto:<a href="mailto:r-br-bounces@listas.c3sl.ufpr.br" target="_blank">r-br-bounces@listas.c3sl.ufpr.br</a>] <b>Em nome de </b>Pedro Emmanuel
Alvarenga Americano do Brasil<br>
<b>Enviada em:</b> quarta-feira, 22 de maio de 2013 21:34<br>
<b>Para:</b> R BR lista<br>
<b>Assunto:</b> [R-br] Area sob uma curva<u></u><u></u></span></p>
</div><div><div>
<p class="MsoNormal"><u></u> <u></u></p>
<p>Amigos de R,<u></u><u></u></p>
<p>Ha muito tempo atras, acho que ainda na R-stat, alguem postou que havia uma
funçao que estima a area sob uma curva. Procurei e procurei e nao achei. Alguem
sabe me dizer se existe mesmo uma funçao com esse proposito? Preferencialmente
em um pacote do core. <u></u><u></u></p>
<p>Abraço a todos,<u></u><u></u></p>
<p>Pedro Brasil<br>
via Android (:)=<u></u><u></u></p>
</div></div></div>
</div>
<br></div></div><div class="im">_______________________________________________<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></div>