<div dir="ltr">A menos que a linha:<div><font face="monospace">> diff <- abs(y1 - y2)</font></div><div>produza pontos com valores negativos, a abordagem deve dar a área equivalente entre a "parte de cima" da y2 e a "parte de baixo" de y1.</div><div><br></div><div>Em outras palavras, a área definida pelos dois trechos das suas funções y1 e y2 não pode ter "cruzamentos", e se houver precisa ver o que ele significa no domínio do problema alvo do seu estudo.</div><div><br></div><div>Outro ponto importante é ao impor um vetor <font face="monospace">x</font> com valores espaçados duma unidade, há uma implícita imposição do "tamanho" da área que será calculada.</div><div><br></div><div>Aliás, já q se tem os dados no vetor diff, a área seria:</div><div>½∙(diff[1] +2∙sum(diff[2:99]+diff[100]), uma vez que o espaço entre pontos é a unidade.</div><div>com as unidades da abscissa multiplicada pela da ordenada.</div><div><br></div><div>HTH</div><div>--</div><div>Cesar Rabak</div><div><br></div><div><br></div><div><br></div></div><br><div class="gmail_quote gmail_quote_container"><div dir="ltr" class="gmail_attr">On Mon, Jan 20, 2025 at 3:09 PM Izabella Maria Viana por (R-br) <<a href="mailto:r-br@listas.c3sl.ufpr.br">r-br@listas.c3sl.ufpr.br</a>> wrote:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><div dir="ltr"><div dir="ltr"><div>Boa tarde!</div><div><br></div><div>Pessoal, alguém conhece alguma função para o cálculo entre duas curvas?</div><div>Utilizei o pacote "pracma", com a função trapz, que utiliza a regra dos trapézios. </div><div>Por exemplo:</div><div><br></div><div><div>x <- seq(1,100)</div><div><br></div><div># Ajustando de duas curvas</div><div>y1 <- dados1 </div><div>y2 <- dados2</div><div><br></div><div># Calculo da area</div><div>diff <- abs(y1 - y2)</div><div>area <- trapz(x, diff)</div></div><div><br></div><div>Este raciocínio está correto?</div><div><br></div><span class="gmail_signature_prefix">-- </span><br><div dir="ltr" class="gmail_signature"><div dir="ltr"><div>Izabella M S Viana</div>Doutoranda em Estatística (UFPE)<div>Economista e Mestre em Economia (UFV)</div><div>Professora Orientadora USP/ESALq<br><div>Email secundário: <a href="mailto:izabella.maria@ufpe.br" target="_blank">izabella.maria@ufpe.br</a></div></div></div></div></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" rel="noreferrer" 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" rel="noreferrer" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br>
</blockquote></div>