|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?我要加入
x
下面的程序,在设定循环次数比较小的情况下,运行速度还可以,次数多的时候就非常的慢。请问
这程序是否可以改进。多谢。
目的是记录下满足特定结论(迭代结果)的各参数取值情况
kk=[];
ss=[];
hh=[];
是参数的记录情况
plot是判定条件,看能否出现想要的结果
目的不是画图,而是记录k,s,h的取值情况,plot是提示出现想要的结论
clear all
clc
format long;
xxx1=[];
xxx2=[];
kk=[];
ss=[];
hh=[];
for k=1:2:19
for s=1:1:6
for h=1.5:0.1:3.6
XX1=[];
XX2=[];
x1(1)=0.5;
x2(1)=0.7;
for t=1:10
x1(t+1)=h*x1(t)+s*sin(k*(x2(t)));
x2(t+1)=h*x2(t)+s*cos(k*(x1(t)));
XX1=[XX1,x1(t)];
XX2=[XX2,x2(t)];
end
xxx1=[xxx1,x1(10)];
xxx2=[xxx2,x2(10)];
if abs(x1(10)-219.02)<1e-2&&abs(x2(10)-79.669)<1e-2 %%% 此时k=5;s=3;h=1.8;
plot(x1(10),x2(10),'o');
kk=[kk,k];
ss=[ss,s];
hh=[hh,h];
xxx1=[xxx1,x1(10)];
xxx2=[xxx2,x2(10)];
end
end
end
end
[ 本帖最后由 pleaseopen 于 2006-11-23 13:51 编辑 ] |
|