24小时热门版块排行榜    

查看: 633  |  回复: 0

zsma

木虫 (著名写手)

小木虫之二当家

[求助] 微分方程定解问题

微分方程定解问题

需要在此微分方程组中求解出y1,y2,u三个函数,r是变量,但是现在不求解,也不报错,请求高手指点。

代码:

eq1 = u'[r] - (y1[r] - 2 r*y2[r])/E - \[CapitalOmega]*c[r]/3 == 0
eq2 = u[r]/r - (-\[Nu]*y1[r] + (1 - \[Nu]) r*y2[r])/E - \[CapitalOmega]*c[r]/3 == 0
eq3 = y1'[r] + 2 (y1[r] - y2[r])/r == 0
DSolve[{eq1, eq2, eq3, y1[R] == 0, y1[0] == \[Infinity]}, {y1[r],  y2[r], u[r]}, r]
回复此楼

» 猜你喜欢

绝没说是第一,更没有说是第二!
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 zsma 的主题更新
信息提示
请填处理意见