Re: solving nonlinear equation with mathematica !!

• To: mathgroup at smc.vnet.net
• Subject: [mg47177] Re: solving nonlinear equation with mathematica !!
• From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
• Date: Mon, 29 Mar 2004 04:22:24 -0500 (EST)
• Organization: Universitaet Leipzig
• References: <c438oj\$ekr\$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```Hi,

elim = Eliminate[{x^2 - y - 1 == 0,
10x Exp[-x] - y == 0}, y];

elim = Eliminate[{x^2 - y - 1 == 0,
10x Exp[-x] - y == 0}, y];

{x, x^2 - y - 1 == 0} /. FindRoot[elim, {x, 1}] /.
a_Equal :> (y /. Solve[a, y][[1]])

Regards
Jens

why wrote:
>
> Hi,
>
> I face root finding problem solving nonlinear equation
>
> I have system nonlinear equation
>
> x^2-y-1 = 0;
> 10x exp(-x)-y = 0 ;
>
> If you draw the graph you see two intersecting point .
>
> I have found a point [Using FindRoot function ]
> In (-0.1,-0.5) the point is (-0.0905897,-0.991794 )---it is OK
>
> But
> In (2.0,1.0) the point is (1.94463,2.7816)
> But the graph says the x->2.something ,y->1.somthing
> I have used same FindRoot function to find the root
> in (2.0,1.0 ).
>
>
> ..
> I want(exam)to use other methods(bisection/secant etc).
> If any one have workout examples of nonlinear equation
> please let me know .
> .....
>
> Thank You .

```

• Prev by Date: Re: Smooth animation
• Next by Date: Re: exporting fonts in postscript
• Previous by thread: Re: solving nonlinear equation with mathematica !!
• Next by thread: Re: solving nonlinear equation with mathematica !!