Mathematica 9 is now available
Student Support Forum
-----
Student Support Forum: 'Solving a nonlinear equation system' topicStudent Support Forum > General > Archives > "Solving a nonlinear equation system"

Next Comment >Help | Reply To Topic
Author Comment/Response
mfu
01/26/09 4:33pm

Can anybody give me any suggestions about solving the below equation system.
Below, I have a well defined 12 equations with 12 unknowns, and this system should be solvable. But my code is running for a long time without returning any result. Those Max operators within the equations should be making it difficult to compute...
thanks for any help,



Eqns=List[1 - Vi111 +
0.95 (1/3 (0.44 Vi113 + 0.36 Vi123 + 0.22 Vi213 + 0.18 Vi223) +
1/3 (4.32+ 0.22 Vi212 + 0.18 Max[8, Vi222] +
0.44 Max[12, Vi112]) +
1/3 (5.4+ 0.22 Vi211 + 0.18 Max[11, Vi221] +
0.44 Max[15, Vi111])),
1 - Vi112 +
0.95 (1/3 (0.44 Vi113 + 0.36 Vi123 + 0.22 Vi213 + 0.18 Vi223) +
1/3 (4.32+ 0.22 Vi212 + 0.18 Max[8, Vi222] +
0.44 Max[12, Vi112]) +
1/3 (5.4+ 0.22 Vi211 + 0.18 Max[11, Vi221] +
0.44 Max[15, Vi111])),
1 - Vi113 +
0.95 (1/3 (0.44 Vi113 + 0.36 Vi123 + 0.22 Vi213 + 0.18 Vi223) +
1/3 (4.32+ 0.22 Vi212 + 0.18 Max[8, Vi222] +
0.44 Max[12, Vi112]) +
1/3 (5.4+ 0.22 Vi211 + 0.18 Max[11, Vi221] +
0.44 Max[15, Vi111])),
1 - Vi121 +
0.95 (1/3 (0.38 Vi113 + 0.42 Vi123 + 0.19 Vi213 + 0.21 Vi223) +
1/3 (5.04+ 0.19 Vi212 + 0.21 Max[8, Vi222] +
0.38 Max[12, Vi112]) +
1/3 (6.3+ 0.19 Vi211 + 0.21 Max[11, Vi221] +
0.38 Max[15, Vi111])),
1 - Vi122 +
0.95 (1/3 (0.38 Vi113 + 0.42 Vi123 + 0.19 Vi213 + 0.21 Vi223) +
1/3 (5.04+ 0.19 Vi212 + 0.21 Max[8, Vi222] +
0.38 Max[12, Vi112]) +
1/3 (6.3+ 0.19 Vi211 + 0.21 Max[11, Vi221] +
0.38 Max[15, Vi111])),
1 - Vi123 +
0.95 (1/3 (0.38 Vi113 + 0.42 Vi123 + 0.19 Vi213 + 0.21 Vi223) +
1/3 (5.04+ 0.19 Vi212 + 0.21 Max[8, Vi222] +
0.38 Max[12, Vi112]) +
1/3 (6.3+ 0.19 Vi211 + 0.21 Max[11, Vi221] +
0.38 Max[15, Vi111])),
1 - Vi211 +
0.95 (1/3 (0.11 Vi113 + 0.09 Vi123 + 0.22 Vi213 + 0.18 Vi223) +
1/3 (1.08+ 0.22 Vi212 + 0.18 Max[8, Vi222] +
0.11 Max[12, Vi112]) +
1/3 (1.35+ 0.22 Vi211 + 0.18 Max[11, Vi221] +
0.11 Max[15, Vi111])),
1 - Vi212 +
0.95 (1/3 (0.11 Vi113 + 0.09 Vi123 + 0.22 Vi213 + 0.18 Vi223) +
1/3 (1.08+ 0.22 Vi212 + 0.18 Max[8, Vi222] +
0.11 Max[12, Vi112]) +
1/3 (1.35+ 0.22 Vi211 + 0.18 Max[11, Vi221] +
0.11 Max[15, Vi111])),
1 - Vi213 +
0.95 (1/3 (0.11 Vi113 + 0.09 Vi123 + 0.22 Vi213 + 0.18 Vi223) +
1/3 (1.08+ 0.22 Vi212 + 0.18 Max[8, Vi222] +
0.11 Max[12, Vi112]) +
1/3 (1.35+ 0.22 Vi211 + 0.18 Max[11, Vi221] +
0.11 Max[15, Vi111])),
1 - Vi221 +
0.95 (1/3 (0.095 Vi113 + 0.105 Vi123 + 0.19 Vi213 + 0.21 Vi223) +
1/3 (1.26+ 0.19 Vi212 + 0.21 Max[8, Vi222] +
0.095 Max[12, Vi112]) +
1/3 (1.575+ 0.19 Vi211 + 0.21 Max[11, Vi221] +
0.095 Max[15, Vi111])),
1 - Vi222 +
0.95 (1/3 (0.095 Vi113 + 0.105 Vi123 + 0.19 Vi213 + 0.21 Vi223) +
1/3 (1.26+ 0.19 Vi212 + 0.21 Max[8, Vi222] +
0.095 Max[12, Vi112]) +
1/3 (1.575+ 0.19 Vi211 + 0.21 Max[11, Vi221] +
0.095 Max[15, Vi111])),
1 - Vi223 +
0.95 (1/3 (0.095 Vi113 + 0.105 Vi123 + 0.19 Vi213 + 0.21 Vi223) +
1/3 (1.26+ 0.19 Vi212 + 0.21 Max[8, Vi222] +
0.095 Max[12, Vi112]) +
1/3 (1.575+ 0.19 Vi211 + 0.21 Max[11, Vi221] +
0.095 Max[15, Vi111]))];

Solve[Eqns == 0, {Vi121, Vi122, Vi123, Vi211, Vi212, Vi213, Vi111,
Vi112, Vi113, Vi221, Vi222, Vi223}]


URL: ,

Subject (listing for 'Solving a nonlinear equation system')
Author Date Posted
Solving a nonlinear equation system mfu 01/26/09 4:33pm
Re: Solving a nonlinear equation system ZTomee 03/13/09 09:07am
Next Comment >Help | Reply To Topic