声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 1350|回复: 4

[非线性振动] 各位学长帮忙

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

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

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

x
各位学长,请帮帮忙, 我想得到 当a 0.01变化到1时,此系统的分岔图程序,我在论坛已搜索过分岔图的相关程序,可我修改后要不就是运行不了,要不就是运行结果不对,:@( 请各位学长帮忙编一下此程序,非常感谢!请各位学长帮帮忙!

未命名1.JPG
回复
分享到:

使用道具 举报

发表于 2007-11-11 12:41 | 显示全部楼层

回复 #1 吉祥如意 的帖子

将你修改的程序贴上来,以便别人帮你修改
 楼主| 发表于 2007-11-11 14:41 | 显示全部楼层

回复 #2 无水1324 的帖子

我的程序是:
function xdot=ddddd(t,x,flag, gamma)
omega = 1;
xdot=[x(2); -gamma*x(2)-x(1)-x(1)*x(1)+x(1)^3+100*cos(omega*t)];

clear;clc;close all;
gamma=0.1:0.001:1.0;
omega=1:0.01:2;
for h=1:length(gamma)
    T=2*pi/omega(h);
    [t,x]=ode45('ddddd',[0:T/100:220*T],[0 0],[], gamma(h));
    plot(gamma(h),x(10000:100:end,2),'k.');hold on
end
发表于 2007-11-11 17:24 | 显示全部楼层

回复 #3 吉祥如意 的帖子

function xdot=ddddd(t,x,flag, gamma)
omega = 1;
xdot=[x(2); -gamma*x(2)-x(1)-x(1)*x(1)+x(1)^3+100*cos(omega*t)];

clear;clc;close all;
gamma=0.1:0.001:1.0;
omega=1;
for h=1:length(gamma)
    T=2*pi/omega;
    [t,x]=ode45('ddddd',[0:T/100:220*T],[0 0],[], gamma(h));
    plot(gamma(h),x(10000:100:end,2),'k.');hold on
end
 楼主| 发表于 2007-11-12 18:29 | 显示全部楼层

回复 #4 无水1324 的帖子

谢谢学长!
您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

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

GMT+8, 2024-11-11 19:29 , Processed in 0.079165 second(s), 21 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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