Message Boards Message Boards

GROUPS:

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

Posted 1 year ago
1114 Views
|
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
Posted 1 year ago

Exactly! Thank you so much!

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]
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