Solução de Equação não Linear
Boa tarde! Alguém sabe como consigo resolver uma equação não linear no R ? Por exemplo suponha que eu tenho a seguinte equação: y = 2,5*x + 3,6*x^2 + 7,8*x^4+ 10,0*x^12 Para um dado valor de y (exemplo y = 5 ) qual é o valor de x ? Obrigada, Carolina
Uma sugestão seria usar o método de Newton-Raphson: fx<-function(x) (2.5*x+3.6*x^2+7.8*x^4+10*x^12) library(animation) newton.method(fx) 2011/3/18 Carolina Pena <carolinapenaa@yahoo.com.br>
Boa tarde!
Alguém sabe como consigo resolver uma equação não linear no R ?
Por exemplo suponha que eu tenho a seguinte equação:
y = 2,5*x + 3,6*x^2 + 7,8*x^4+ 10,0*x^12
Para um dado valor de y (exemplo y = 5 ) qual é o valor de x ?
Obrigada,
Carolina
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Tente assim: f <- function(x) (2.5 * x + 3.6 * x^2 + 7.8 * x^4 + 10 * x^12 - 5) uniroot(f, lower = 0, upper = 100)$root 2011/3/18 Carolina Pena <carolinapenaa@yahoo.com.br>:
Boa tarde!
Alguém sabe como consigo resolver uma equação não linear no R ?
Por exemplo suponha que eu tenho a seguinte equação:
y = 2,5*x + 3,6*x^2 + 7,8*x^4+ 10,0*x^12
Para um dado valor de y (exemplo y = 5 ) qual é o valor de x ?
Obrigada,
Carolina
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
-- Henrique Dallazuanna Curitiba-Paraná-Brasil 25° 25' 40" S 49° 16' 22" O
Opa pessoal calma ai está havendo uma possivel confusao aqui. Carolina, voce quer dizer encontrar as reizar de um polinomio? se for (e parece ser) as solucoes apresetnadas nao serao satisfatorias, nao te darao o que procura Vamos comecar com um caso simples: seja f(x) = 3 -4 x + x^2 para encontrar as reizes deste polinomio chame a função polyroot() com os coeficientes do polinomio comecando pelo do termo de menor grau
polyroot(c(3, -4, 1)) [1] 1+0i 3+0i
On Fri, 18 Mar 2011, Henrique Dallazuanna wrote:
Tente assim:
f <- function(x) (2.5 * x + 3.6 * x^2 + 7.8 * x^4 + 10 * x^12 - 5) uniroot(f, lower = 0, upper = 100)$root
2011/3/18 Carolina Pena <carolinapenaa@yahoo.com.br>:
Boa tarde!
Alguém sabe como consigo resolver uma equação não linear no R ?
Por exemplo suponha que eu tenho a seguinte equação:
y = 2,5*x + 3,6*x^2 + 7,8*x^4+ 10,0*x^12
Para um dado valor de y (exemplo y = 5 ) qual é o valor de x ?
Obrigada,
Carolina
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
-- Henrique Dallazuanna Curitiba-Paraná-Brasil 25° 25' 40" S 49° 16' 22" O _______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
Bom dia! Era isso mesmo. A partir do comando 'uniroot' eu consegui encontrar no help do R a opção polyroot; foi ela que utilizei. Obrigada, Carolina ________________________________ De: Paulo Justiniano <paulojus@leg.ufpr.br> Para: r-br@listas.c3sl.ufpr.br Enviadas: Sexta-feira, 18 de Março de 2011 17:24:08 Assunto: Re: [R-br] Solução de Equação não Linear Opa pessoal calma ai está havendo uma possivel confusao aqui. Carolina, voce quer dizer encontrar as reizar de um polinomio? se for (e parece ser) as solucoes apresetnadas nao serao satisfatorias, nao te darao o que procura Vamos comecar com um caso simples: seja f(x) = 3 -4 x + x^2 para encontrar as reizes deste polinomio chame a função polyroot() com os coeficientes do polinomio comecando pelo do termo de menor grau
polyroot(c(3, -4, 1)) [1] 1+0i 3+0i
On Fri, 18 Mar 2011, Henrique Dallazuanna wrote:
Tente assim:
f <- function(x) (2.5 * x + 3.6 * x^2 + 7.8 * x^4 + 10 * x^12 - 5) uniroot(f, lower = 0, upper = 100)$root
2011/3/18 Carolina Pena <carolinapenaa@yahoo.com.br>:
Boa tarde!
Alguém sabe como consigo resolver uma equação não linear no R ?
Por exemplo suponha que eu tenho a seguinte equação:
y = 2,5*x + 3,6*x^2 + 7,8*x^4+ 10,0*x^12
Para um dado valor de y (exemplo y = 5 ) qual é o valor de x ?
Obrigada,
Carolina
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
-- Henrique Dallazuanna Curitiba-Paraná-Brasil 25° 25' 40" S 49° 16' 22" O _______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br
participantes (4)
-
Carolina Pena -
Daniel C Bezerra -
Henrique Dallazuanna -
Paulo Justiniano