Is there a better way of solving simultaneous differential equations then using dsolve as MATLAB crashes everytime I use it?

2 次查看(过去 30 天)
So I have a set of simulataneous differential equtions that need to be solved as such:
Diffs.PNG
Ive been using this code but as stated in the title MATLAB crashes is there any better way of doing this:
clear
clc
syms P1(t) P2(t) P3(t) P4(t) P5(t) P6(t) P7(t) P8(t)...
Lam1 Lam2 Lam3 Mu1 Mu2 Mu3
% Typing in all the equations
eqns = ...
[diff(P1,t) == (-Lam1-Lam2-Lam3)*P1 + (Mu1)*P2 + (Mu2)*P3 + (Mu3)*P4,...
diff(P2,t) == (Lam1)*P1 + (-Mu1-Lam2-Lam3)*P2 + (Mu2)*P5 + (Mu3)*P6,...
diff(P3,t) == (Lam2)*P1 + (-Mu2-Lam1-Lam3)*P3 + (Mu1)*P5 + (Mu3)*P7,...
diff(P4,t) == (Lam3)*P1 + (-Mu3-Lam1-Lam2)*P4 + (Mu1)*P6 + (Mu2)*P7,...
diff(P5,t) == (Lam2)*P2 + (Lam1)*P3 + (-Mu1-Mu2-Lam3)*P5 + (Mu3)*P8,...
diff(P6,t) == (Lam3)*P2 + (Lam1)*P4 + (-Mu1-Mu3-Lam2)*P6 + (Mu2)*P8,...
diff(P7,t) == (Lam3)*P3 + (Lam2)*P4 + (-Mu2-Mu3-Lam1)*P7 + (Mu1)*P8,...
diff(P8,t) == (Lam3)*P5 + (Lam2)*P6 + (Lam1)*P7 + (-Mu1-Mu2-Mu3)*P8]
% Solutions Solver
sol = dsolve(eqns, P1(0) == 1, P2(0) == 0, P3(0) == 0, P4(0) == 0,P5(0) == 0, P6(0) == 0,...
P7(0) == 0, P8(0) == 0)
% Printing the Solutions
solP1(t)= sol.P1
solP2(t)= sol.P2
solP3(t)= sol.P3
solP4(t)= sol.P4
solP5(t)= sol.P5
solP6(t)= sol.P6
solP7(t)= sol.P7
solP8(t)= sol.P8
  4 个评论
Walter Roberson
Walter Roberson 2019-2-27
For whatever it is worth, Maple returns a solution within a reasonable time. I have attached it as a file due to technical problems with copy/paste.

请先登录,再进行评论。

采纳的回答

Star Strider
Star Strider 2019-2-27
You have a linear system:
so the solution is going to be the matrix exponential:
that in MATLAB code is:
syms P(t) Lam1 Lam2 Lam3 Mu1 Mu2 Mu3 t
A = [ - Lam1 - Lam2 - Lam3, Mu1, Mu2, Mu3, 0, 0, 0, 0
Lam1, - Lam2 - Lam3 - Mu1, 0, 0, Mu2, Mu3, 0, 0
Lam2, 0, - Lam1 - Lam3 - Mu2, 0, Mu1, 0, Mu3, 0
Lam3, 0, 0, - Lam1 - Lam2 - Mu3, 0, Mu1, Mu2, 0
0, Lam2, Lam1, 0, - Lam3 - Mu1 - Mu2, 0, 0, Mu3
0, Lam3, 0, Lam1, 0, - Lam2 - Mu1 - Mu3, 0, Mu2
0, 0, Lam3, Lam2, 0, 0, - Lam1 - Mu2 - Mu3, Mu1
0, 0, 0, 0, Lam3, Lam2, Lam1, - Mu1 - Mu2 - Mu3];
P = expm(A*t)
My Ryzen 7 1700 machine has been working on this for the past hour and does not appear to be close to finishing. I’m stopping it now, and will let you pursue this.

更多回答(0 个)

标签

Community Treasure Hunt

Find the treasures in MATLAB Central and discover how the community can help you!

Start Hunting!

Translated by