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