Re: Solving Equations with 3 variables and many parameters

• To: mathgroup at smc.vnet.net
• Subject: [mg132386] Re: Solving Equations with 3 variables and many parameters
• From: Narasimham <mathma18 at gmail.com>
• Date: Tue, 4 Mar 2014 01:48:42 -0500 (EST)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• Delivered-to: l-mathgroup@wolfram.com
• Delivered-to: mathgroup-outx@smc.vnet.net
• Delivered-to: mathgroup-newsendx@smc.vnet.net

```a[i_] = i ; b[j_] = 2 j - 3;

NSolve[{P1 == (a[1] + Con*b[11] + b[12]*P2)/(2*b[11]),
P2 == (a[2] + Con*b[22] + b[21]*P1)/(2*b[22])}, {P1, P2}]
NSolve[{P1 == (a[1] + Con*b[11] + b[12]*P2 + b[13]*P3)/(2*b[11]),
P2 == (a[2] + Con*b[22] + b[21]*P1 + b[23]*P3)/(2*b[22]),
P3 == (a[3] + Con*b[33] + b[31]*P1 + b[32]*P2)/(2*b[33])}, {P1, P2,
P3}]

Define your a and b. C is protected.

Use either Solve or NSolve.

{{P1 -> 0.0539835\[VeryThinSpace]+ 1.05311 Con,
P2 -> 0.0500653\[VeryThinSpace]+ 1.00087 Con}}

{{P1 -> -0.818902 - 16.5375 Con, P2 -> -0.742073 - 14.9625 Con, P3 -> -0.718902 - 14.4875 Con}}

Narasimham

```

• Prev by Date: Re: Bug in Homogeneous Solution of Differential equation?
• Next by Date: inverse laplace transforms
• Previous by thread: Re: Solving Equations with 3 variables and many parameters
• Next by thread: Error during independent variable change parametric plot3D