Re: Roots of a Jacobi polynomial
- To: mathgroup at smc.vnet.net
- Subject: [mg120644] Re: Roots of a Jacobi polynomial
- From: Bob Hanlon <hanlonr at cox.net>
- Date: Mon, 1 Aug 2011 06:57:55 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Reply-to: hanlonr at cox.net
Restart Mathematica eqlist = Rationalize[{ 101.74 == a + ((0.055/(479248/c))*(352343 + ((479248/c)*a) - (158194*b/c))), 47205 + ((158194/c)*a) - ((61842/c)*b) == 68043.98 + (299.73*b), 460584 + (479248*(a^2)/(c^2)) - (158194*b* a/(c^2)) + (61842*(b^2)/(c^2)) == 21986 + (3576*c)}]; NSolve[eqlist, {a, b, c}, Reals][[1]] {a -> 92.1341, b -> 103.075, c -> 158.517} And @@ (eqlist /. %) True Bob Hanlon ---- Richard Kendall-Smith <richpks at gmail.com> wrote: ============= Hi, I'm trying to solve a set of non-linear equations by doing the following: eqlist = {101.74 == a + ((0.055/(479248/c))*(352343 + ((479248/c)*a) - (158194*b/c))), 47205 + ((158194/c)*a) - ((61842/c)*b) == 68043.98 + (299.73*b), 460584 + (479248*(a^2)/(c^2)) - (158194*b*a/(c^2)) + (61842*(b^2)/(c^2)) == 21986 + (3576*c)} NSolve[eqlist, {a, b, c}, Reals] But it interprets c as Musical Notation. I have tried altering the variables to x y and z but then it comes up with a Visual Form error. I'm new to Mathematica but I don't see why this is happening because aren't we specifying a, b, c as variables to be solved? Thanks, Richard