Re: Solving simultaneous eqns

• To: mathgroup at smc.vnet.net
• Subject: [mg14287] Re: Solving simultaneous eqns
• From: "W. K. Bertram" <wkb at ansto.gov.au>
• Date: Tue, 13 Oct 1998 01:21:08 -0400
• Organization: Australian Nuclear Science and Technology Organisation
• References: <6vf3ta\$dde@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

```Yeoung-Sang Yun wrote:

> Hello!
>
> I want to know how to solve the following simulaneous equations in
> Mathematica:
>
> x=x^1.2/(2*x^3+y^0.7+4*z^2.5)
> y=y^0.7/(2*x^0.6+y^2+z^2.2)
> z=0.9*z^1.5/(x^0.7+2*y^0.2+z^1.1)
>

Hi,

Use:

FindRoot[{x == x^1.2/(2*x^3+y^0.7+4*z^2.5),
y == y^0.7/(2*x^0.6+y^2+z^2.2),
z == 0.9*z^1.5/(x^0.7+2*y^0.2+z^1.1)},
{x,1},{y,1},{z,1}]

to get:

{x -> 0.2071155206958545 - 4.456053142803247*^-10*I,
y -> 0.6156594604688913 + 1.237663943046694*^-9*I,
z -> 2.09226461646654*^-15 +  2.130084871188269*^-16*I}

Cheers,
Bill

```

• Prev by Date: Re: How: {{a,b},{1,2,3}} --> {{a,1},{b,2},{a,3}} ?
• Next by Date: Re: Unexpected results
• Previous by thread: Re: Solving simultaneous eqns
• Next by thread: RE: Re: Solving simultaneous eqns