| 查看: 821 | 回复: 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 |
回复此楼» 猜你喜欢
应该是93bebmhtak前后十一个字符比较关键
已经有19人回复
-
2026国自然放榜时间
已经有9人回复
-
这样的filecode谁见过
已经有22人回复
-
据悉今年马上要出结果了
已经有6人回复
-
综述论文作为代表作会不会影响评审专家的印象分？
已经有7人回复
-
面上项目filecode邪修
已经有7人回复
-
关于代码变化问题，想知道的进来
已经有22人回复
-
filecode与中标关系的预测
已经有5人回复
-
fileCode有新解读？
已经有18人回复
-
关于filecode，很负责任的告诉大家
已经有7人回复
2楼2016-03-17 22:39:36
100