Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]
Groups > comp.soft-sys.math.mathematica > #16608
| From | Narasimham <mathma18@gmail.com> |
|---|---|
| Newsgroups | comp.soft-sys.math.mathematica |
| Subject | Re: Solving Equations with 3 variables and many parameters |
| Date | 2014-03-04 07:06 +0000 |
| Message-ID | <lf3u2j$ch2$1@smc.vnet.net> (permalink) |
| Organization | Time-Warner Telecom |
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
Back to comp.soft-sys.math.mathematica | Previous | Next | Find similar
Re: Solving Equations with 3 variables and many parameters Narasimham <mathma18@gmail.com> - 2014-03-04 07:06 +0000
csiph-web