声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 2381|回复: 4

[分形与混沌] 大侠帮忙看看这个方程的poincare map 是怎么画的啊?

[复制链接]
发表于 2007-7-27 15:21 | 显示全部楼层 |阅读模式

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

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

x
方程是function si=sirs(t,x,b1,b3,p,c)
b1=0;
b3=5;
p=3;
c=2.5981;
si=[x(2);-c^2+x(1)^2+0.00002*(b1*x(2)+((2*p-2)/p)*x(1)*x(2)+((p^3*b3)/(2-2*p))*sin(2*t))];

我为什么不能画出下面给出的图呢?
chaos.jpg
我的程序是:
clc
clear
b1=0;
b3=5;
p=3;
c=2.5981;
options=odeset('RelTol',1e-7);
tt=0.01;
[t,x]=ode45(@sirs,[0:tt/100:5*tt],[-5.19,0],[],b1,b3,p,c);
plot(x(300:end,1),x(300:end,2))
%pojialai
hold on
for i=100:10:500
plot(x(i,1),x(i,2),'r.')
end

图形是:
untitled.jpg

[ 本帖最后由 sdlmx 于 2007-7-27 15:26 编辑 ]
回复
分享到:

使用道具 举报

发表于 2007-7-27 15:29 | 显示全部楼层
clc
clear
b1=0;
b3=5;
p=3;
c=2.5981;
options=odeset('RelTol',1e-7);
T=pi;
tt=100*T;
[t,x]=ode45(@sirs,[0:T/100:tt],[-5.19,0],[],b1,b3,p,c);
plot(x(8000:100:end,1),x(8000:100:end,2),'k.')
 楼主| 发表于 2007-7-27 15:36 | 显示全部楼层
提示有问题啊
Warning: Failure at t=1.027494e+001.  Unable to meet integration tolerances without reducing the step size below the smallest value allowed (2.842171e-014) at time t.
> In ode45 at 355

我是按照文章上给的参数值来画的啊

[ 本帖最后由 sdlmx 于 2007-7-27 15:39 编辑 ]
发表于 2007-7-27 17:01 | 显示全部楼层
你确定你给的系统和图没有错?我也得不到你的图啊
发表于 2007-7-27 17:02 | 显示全部楼层

回复 #3 sdlmx 的帖子

检查你的参数吧
您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

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

GMT+8, 2024-12-5 04:54 , Processed in 0.073182 second(s), 21 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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