| 查看: 789 | 回复: 1 | ||
lf19921992新虫 (小有名气)
|
[求助]
如何用Maple和Mathematica求解如下常微分方程组 已有1人参与
|
|
在maple中运行的时候要么会算出常数解，要么就是算很久都没算出来。 在Mathematica中运行就直接原样输出结果。 小弟对这两个软件都是生手，请大神指点！软件界面图附于贴后 mathematica代码： DSolve[{a''[ t] == (1/2)*(705*T^2*b[t]^2 + 378*T*a[t]*b[t] - 14*a[t]^2)*(a'[t])^2/(a[ t]*(15*T^2*b[t]^2 + 21*T*a[t]*b[t] + 7*a[t]^2)) + (15/4)*T^2* b[t]*(84*T*b[t] + 47*a[t])*(a'[t]* b'[t])/(a[ t]*(15*T^2*b[t]^2 + 21*T*a[t]*b[t] + 7*a[t]^2)) + (15/8)* T^2*(147*T^2*b[t]^2 + 84*T*a[t]*b[t] + 2*a[t]^2)*(b'[t])^2/(a[ t]*(15*T^2*b[t]^2 + 21*T*a[t]*b[t] + 7*a[t]^2)), b''[t] == (35*(12*T*b[t] + 7*a[t]))* b[t]*(a'[t])^2/(a[ t]*(15*T^2*b[t]^2 + 21*T*a[t]*b[t] + 7*a[t]^2)) - (7/ 2)*(105*T^2*b[t]^2 + 63*T*a[t]*b[t] + 2*a[t]^2)*(a'[t]* b'[t])/(a[ t]*(15*T^2*b[t]^2 + 21*T*a[t]*b[t] + 7*a[t]^2)) - (3/4)* T*(420*T^2*b[t]^2 + 255*T*a[t]*b[t] + 14*a[t]^2)*(b'[t])^2/(a[ t]*(15*T^2*b[t]^2 + 21*T*a[t]*b[t] + 7*a[t]^2))}, {a[t], b[t]}, t]  Mathematica1.jpg  Mathematica2.jpg  Mathematica3.jpg  Maple1.jpg  Maple2.jpg |
回复此楼» 猜你喜欢
Sci. Bull. 悲剧经验
已经有6人回复
-
提交了我也来说说感想
已经有5人回复
-
今年审到国自然15份，谈谈感受
已经有20人回复
-
国自然评分
已经有4人回复
-
面上本子正文33页，违规吗？会被低分嘛？
已经有11人回复
-
评审有感
已经有22人回复
-
反应很差，大量原料没有反应
已经有6人回复
-
如果工作了想读博，可以边工作边读全日制嘛？
已经有5人回复
-
如何实现卤原子转化
已经有8人回复
-
河北省自然科学基金
已经有3人回复
2楼2016-03-17 22:39:36
30