Message Boards Message Boards

Numerically solving non-linear algebraic equations

Posted 2 years ago

Hello, I can not solve the system. Can any one help me with that? Thanks.

POSTED BY: Vedat Erturk
6 Replies
Posted 2 years ago

I wonder if there are no solutions because of the following:

eq = Expand[{f1[S, e, I1, I2, R] == 0,
    f2[S, e, I1, I2, R] == 0,
    f3[S, e, I1, I2, R] == 0,
    f4[S, e, I1, I2, R] == 0,
    f5[S, e, I1, I2, R] == 0}];

Solve[eq[[{1, 2}]], {I1, I2}]
(* {} *)

If there are no solutions for I1 and I2 using just the first two equations, then adding additional equations can't help. Of course, the fact that in the first two equations are both functions of I1+I2 might negate that conclusion.

POSTED BY: Jim Baldwin
Posted 2 years ago

Hello, Jim Baldwin; Thank you for your reply. I guess the idea in your mind is the substitution method. By the way, the followings give result:

Solve[eq[[{1, 3}]], {I1, I2}]
Solve[eq[[{1, 4}]], {I1, I2}]
Solve[eq[[{1, 5}]], {I1, I2}]
Solve[eq[[{2, 3}]], {I1, I2}]
Solve[eq[[{2, 4}]], {I1, I2}]
Solve[eq[[{2, 5}]], {I1, I2}]
POSTED BY: Vedat Erturk
Posted 2 years ago

Please ignore NSolve. Solve does not give any solution,too.

POSTED BY: Vedat Erturk

What I mean, as noted in comments to the MSE x-post, is that it is impossible to return a numeric solution because several parameters are symbolic.

POSTED BY: Daniel Lichtblau

What kind of solution would you expect from NSolve?

POSTED BY: Daniel Lichtblau
Posted 2 years ago

Hello Daniel Lichtblau ,Thank you for your reply.I expect all solutions of the systems.In my system, S, e, I1, I2 and R are unknowns except the others.I can not see the results since the running of the code does not finish by NSolve and Solve.Thanks.

POSTED BY: Vedat Erturk
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard

Group Abstract Group Abstract