24小时热门版块排行榜    

查看: 740  |  回复: 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]
如何用Maple和Mathematica求解如下常微分方程组
Mathematica1.jpg


如何用Maple和Mathematica求解如下常微分方程组-1
Mathematica2.jpg


如何用Maple和Mathematica求解如下常微分方程组-2
Mathematica3.jpg


如何用Maple和Mathematica求解如下常微分方程组-3
Maple1.jpg


如何用Maple和Mathematica求解如下常微分方程组-4
Maple2.jpg
回复此楼

» 猜你喜欢

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xzczd

木虫 (小有名气)

【答案】应助回帖

感谢参与,应助指数 +1
非线性微分方程没解析解的情况很常见。考虑数值解吧。
小木虫Mathematica版块已毁(当然原本也不咋的),建议大家前往百度贴吧或Stackexchange。
2楼2016-03-17 22:39:36
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 lf19921992 的主题更新
信息提示
请填处理意见