马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?我要加入
x
没事做写着玩的,大家不要见笑
洛仑兹方程:
dx/dt=-σ(x-y);
dy/dt=rx-y-xz;
dz/dt=xy-bz;
程序:
- function dy = rigid(t,y)
- dy = zeros(3,1); % a column vector
- u=10;v=29;w=2.67;
- dy(1)=-u*(y(1)-y(2));
- dy(2)=v*y(1)-y(2)-y(1)*y(3);
- dy(3)=y(1)*y(2)-w*y(3);
复制代码
- options = odeset('RelTol',1e-4,'AbsTol',[1e-4 1e-4 1e-5]);
- [T1,Y1] = ode45(@rigid,[0 20],[12 2 9],options);
- [T2,Y2] = ode45(@rigid,[0 20],[12 2.01 9],options);
- [T3,Y3] = ode45(@rigid,[0 20],[12 1.99 9],options);
- plot(T1,Y1(:,1),'r',T2,Y2(:,1),'b',T3,Y3(:,1),'g')
复制代码
[ 本帖最后由 gghhjj 于 2006-8-26 02:37 编辑 ] |