声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 2104|回复: 4

[计算数学] 求助解常微分方程 四阶龙格库塔法

[复制链接]
发表于 2007-6-16 11:23 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
设:a1=y[0]; a2=y[1]; b1=y[2]; b2=y[3]; da1=dy[0]=y[4]; da2=dy[1]=y[5]; db1=dy[2]=y[6]; db2=dy[3]=y[7];
需要求解的四个式子我列在下边了,我用c语言编写的。其中c 、lanmta1、lanmta2、fai、pi为参数。我用c程序调用龙格库塔法求解出来数据绘图时总是不合适。哪位高手用matlab帮我编一下这个四阶龙格库塔法求解这四个式子! 多谢!

dy[4]=16*c*y[5]/3-(lanmta1-fai)*pi*pi*y[0]
  -lanmta1*(3*pi*pi*pi*pi*y[0]*y[0]*y[0]/8+3*pi*pi*pi*y[0]*y[1]+3*pi*pi*pi*pi*y[0]*y[1]*y[1]
  +3*pi*pi*pi*pi*y[0]*y[2]*y[2]/8+pi*pi*pi*y[2]*y[3]+2*pi*pi*pi*pi*y[1]*y[2]*y[3]+pi*pi*pi*pi*y[0]*y[3]*y[3]);
dy[5]=-16*c*y[4]/3-4*(lanmta1-fai)*pi*pi*y[1]
  -lanmta1*(3*pi*pi*pi*y[0]*y[0]/2+3*pi*pi*pi*pi*y[0]*y[0]*y[1]+6*pi*pi*pi*pi*y[1]*y[1]*y[1]
  +pi*pi*pi*y[2]*y[2]/2+pi*pi*pi*pi*y[1]*y[2]*y[2]+2*pi*pi*pi*pi*y[0]*y[2]*y[3]+6*pi*pi*pi*pi*y[1]  *y[3]*y[3]);
dy[6]=16*c*y[7]/3-(pi*pi*lanmta2-fai)*pi*pi*y[2]-lanmta1*(3*pi*pi*pi*pi*y[2]*y[2]*y[2]/8+pi*pi*pi* y[0]*y[3]+3*pi*pi*pi*pi*y[2]*y[3]*y[3]+3*pi*pi*pi*pi*y[0]*y[0]*y[2]/8+pi*pi*pi*y[2]*y[1]+2*pi*pi*pi*pi*y[0]*y[1]*y[3]+pi*pi*pi*pi*y[1]*y[1]*y[2]);
dy[7]=-16*c*y[6]/3-4*(4*pi*pi*lanmta2-fai)*pi*pi*y[3]-lanmta1*(6*pi*pi*pi*pi*y[3]*y[3]*y[3]+pi*pi*pi*y[0]*y[2]+3*pi*pi*pi*pi*y[2]*y[2]*y[3]+pi*pi*pi*pi*y[0]*y[0]*y[3]+6*pi*pi*pi*pi*y[1]*y[1]*y[3]+2*pi*pi*pi*pi*y[0]*y[1]*y[2]);

本帖被以下淘专辑推荐:

回复
分享到:

使用道具 举报

发表于 2007-6-16 13:19 | 显示全部楼层
将你的方程编写成状态空间的形式保存为m函数然后就可以调用计算了。

function xxs=xxxs(t,x,flag,a0,a1)
a=a0+a1*sin(2*t);
% d2x/t2+a*x=0
xxs=[x(2);
    -a*x(1)];

%%%%%%%%%%上面既是mathieu方程状态方程的m函数

x0=[0.1;.1];
a0=6;a1=1;
[t,x]=ode45('xxxs',[0,100],x0,[],a0,a1)
plot(t,x)
%这是计算程序,你跟这一样编写程序就可以了。

还有可以在本版及matlab板块搜索到很多程序!
 楼主| 发表于 2007-6-16 15:53 | 显示全部楼层
该如何把式子写成状态空间形式呢?
发表于 2007-6-16 21:23 | 显示全部楼层
就是简化为一阶的形式,然后把右边写在xxs=[;]里面
发表于 2007-6-17 06:41 | 显示全部楼层
您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-5-10 15:45 , Processed in 0.059026 second(s), 20 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表