Message Boards Message Boards


Solve a set of N coupled algebraic equations with "Solve"?

Posted 11 months ago
2 Replies
1 Total Likes

Hello everyone. I'm attempting to solve a set of N coupled algebraic equations using "Solve". I've successfully done it for a small value of N (2~3 coupled equations, for example), simply by typing the equations as: Solve[{eq1},{eq2},{eq3},{x1,x2,x3}]; however, it's just impracticable when N is high. That being said, I tried to define an array with all my variables: v = Array[t,n] = {t[1],t[2],...,t[n]} and, with a loop structure, I tried - with no success - to solve 3 equations.

In attachment is what I've done so far.

Thank you for you attention.

2 Replies

Do you mean something like this?

n = 4;
eqs = DeleteCases[Flatten[Table[ If[i =!= j, \[Eta]^2 (t[i]^2 - w^2) ==  Product[(t[i] - t[j] - \[Eta])/(t[i] - t[j] + \[Eta]), {j, 1,  n}]], {i, 1, n}, {j, i , n}]], Null]
Posted 11 months ago

Exactly! Thank you so much!

Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
or Discard

Group Abstract Group Abstract