<div dir="ltr">Fiz a instrução do Walmes e resolveu.<div><br></div><div>Obrigado a todos.</div><div><br></div><div>Agora eu estou querendo colocar o "uniroot" dentro de uma função para que a cada combinação y e z ele me retorne o valor de x para a(s) nova(s) interseções. Alguém tem alguma ideia sobre como eu consigo fazer isso?</div><div><br></div><div>Atenciosamente,</div><div class="gmail_extra"><br><div class="gmail_quote">2014-10-16 15:51 GMT-04:00 Rodolfo Marcondes Silva Souza <span dir="ltr"><<a href="mailto:rodolfomssouza@gmail.com" target="_blank">rodolfomssouza@gmail.com</a>></span>:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Olá pessoal,<br>
<br>
Gostaira de saber se é possível calcular o ponto de intercepção entre das funções/equações não lineares no R?<br>
<br>
CMR:<br>
f1=function(x,y){<br>
  x^2 - 3 * y<br>
}<br>
<br>
f2=function(x,z){<br>
  4 * z - x^2<br>
}<br>
<br>
x=seq(1,10,0.5)<br>
y=3<br>
z=15<br>
<br>
plot(x,f1(x,y), type='l', col='red', ylim=c(0,100))<br>
lines(x,f2(x,z), col='blue')<br>
<br>
Eu preciso encontrar um função que fazendo f1=f2 possa me retornar o valor em x onde ocorre a intercepção de f1 e f2. Alguém sabe como se resolve esse problema no R?<br>
<br>
Obrigado,<br>
</blockquote></div><br><br clear="all"><div><br></div>-- <br><div dir="ltr"><div>Rodolfo Marcondes Silva Souza</div><div>Engenheiro Agrônomo</div><div>Mestre em Produção Vegetal - UFRPE/UAST</div><div>Doutorando em Tecnologias Energéticas e Nucleares - UFPE/DEN</div><div><a href="http://lattes.cnpq.br/4486320338778858" target="_blank">Currículo Lattes</a><br></div><div><br></div><div><br></div><div><br></div>
</div>
</div></div>