24小时热门版块排行榜    

查看: 953  |  回复: 9

brqhl_ing

银虫 (小有名气)

[交流] 【求助】即FOR循环之后的问题 已有3人参与

function dx = Rossler(t,x,k1,k2)
dx1=-(1+0.015)*x(2)-x(3)+k1*(x(4)-x(1))+k2*(-x(4)-x(1))*(x(4)-x(1));
dx2=(1+0.015)*x(1)+0.15*x(2);
dx3=0.5+x(3)*(x(1)-10);
dx4=-(1+0.015)*x(5)-x(6)-k1*(x(4)-x(1))-k2*(-x(4)-x(1))*(x(4)-x(1));
dx5=(1+0.015)*x(4)+0.15*x(5);
dx6=0.5+x(6)*(x(4)-10);
dx=[dx1;dx2;dx3;dx4;dx5;dx6];
这是上个FOR循环里面的方程 只不过这次控制项不同  有k1 k2
同样定义误差函数e=((x(:,4)-x(:,1)).^2+(x(:,5)-x(:,2)).^2+(x(:,6)-x(:,3)).^2).^0.5;
如何找出k1 k2 取值使e=0  这个e可以是耦合系统经过一定时间达到误差函数e=0画出k1 k2使e=0的区域  (k1 k2相图)
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xiegangmai

版主 (职业作家)

我没头衔

优秀版主优秀版主优秀版主


anyuezhiji(金币+1):谢谢提供意见 2010-07-14 07:38:28
这个问题好像不能用优化来做,不能写出k1、k2的目标函数。

有个笨一些的方法,假设知道k1,k2的范围,先取k1,k2较大的步长,双重循环计算e。找出e接近0的时候k1,k2的较小范围,再将k1,k2的步长缩小,找到使e=0的k1,k2。

先试试吧。
看看高手有没有别的办法。
明德厚学、求是创新
2楼2010-07-13 23:51:05
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

brqhl_ing

银虫 (小有名气)

引用回帖:
Originally posted by xiegangmai at 2010-07-13 23:51:05:
这个问题好像不能用优化来做,不能写出k1、k2的目标函数。

有个笨一些的方法,假设知道k1,k2的范围,先取k1,k2较大的步长,双重循环计算e。找出e接近0的时候k1,k2的较小范围,再将k1,k2的步长缩小,找到使 ...

这个k1 k2的取值范围是知道的一半都是在0到1之间。就是去k1 k2一个计算步长 相当于把空间分成很多点组成的  计算这些点的e的情况
3楼2010-07-14 08:32:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

brqhl_ing

银虫 (小有名气)

robert2020:匆匆又到暑期毕业季,大家有点忙...烦请耐心等待... 2010-07-16 16:21:08
大家快来讨论讨论 如何解决这个问题啊
4楼2010-07-14 21:02:09
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

brqhl_ing

银虫 (小有名气)

大家快来讨论讨论 如何解决这个问题啊!大侠们快来啊!!
5楼2010-07-16 10:49:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

brqhl_ing

银虫 (小有名气)

不能沉了啊!!高手还没出现呢
6楼2010-07-17 08:56:54
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

free--fire

新虫 (小有名气)

★ ★
brqhl_ing(金币+10): 2010-07-17 11:40:27
anyuezhiji(金币+2):感谢应助,欢迎常来! 2010-07-17 17:49:56
nono2009:代码建议用[code][/code],就不会有显示问题。 2010-07-18 11:11:38
引用回帖:
Originally posted by brqhl_ing at 2010-07-13 20:59:06:
function dx = Rossler(t,x,k1,k2)
dx1=-(1+0.015)*x(2)-x(3)+k1*(x(4)-x(1))+k2*(-x(4)-x(1))*(x(4)-x(1));
dx2=(1+0.015)*x(1)+0.15*x(2);
dx3=0.5+x(3)*(x(1)-10);
dx4=-(1+0.015)*x(5)-x(6)-k1*(x(4)-x( ...

CODE:
function help100716()

clc;
clear all;
tic;

global k1 k2 ;
n=0:0.01:0.5;
s=length(n);
K=zeros(s^2,3);
m=1;
for k1=0:0.01:0.5
    for k2=0:0.01:0.5
        [T,x]=ode45(@Rossler,[0,600],[0.2;0.3;0.6;0.4;0.7;0.1]);
        e=((x(:,4)-x(:,1)).^2+(x(:,5)-x(:,2)).^2+(x(:,6)-x(:,3)).^2).^0.5;
        if(min(e)<=1e-1)%% set the bar of the 'e' value
            K(m,:)=[k1 k2 min(e)];
            m=m+1;
        end
    end
end
if m>1
figure;
plot(K(1:m-1,1:2));
end
toc;
function dx = Rossler(t,x)
global k1 k2;
dx1=-(1+0.015)*x(2)-x(3)+k1*(x(4)-x(1))+k2*(-x(4)-x(1))*(x(4)-x(1));
dx2=(1+0.015)*x(1)+0.15*x(2);
dx3=0.5+x(3)*(x(1)-10);
dx4=-(1+0.015)*x(5)-x(6)-k1*(x(4)-x(1))-k2*(-x(4)-x(1))*(x(4)-x(1));
dx5=(1+0.015)*x(4)+0.15*x(5);
dx6=0.5+x(6)*(x(4)-10);
dx=[dx1;dx2;dx3;dx4;dx5;dx6];

[ Last edited by nono2009 on 2010-7-18 at 11:10 ]
我是流,是浮云天上游;我是虎,是大虫卧山谷。
7楼2010-07-17 10:57:57
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

free--fire

新虫 (小有名气)


adu886886(金币+1):谢谢提供意见 2010-07-18 22:13:28
应该是 K(m,: )=[k1 k2 min(e)];
另外就是计算量太大了,最好是根据k1和k2的对称性将计算量缩减一半。
如果可以的话请将结果告诉大家。
good luck !
我是流,是浮云天上游;我是虎,是大虫卧山谷。
8楼2010-07-17 11:01:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

brqhl_ing

银虫 (小有名气)

引用回帖:
Originally posted by free--fire at 2010-07-17 10:57:57:

function help100716()

clc;
clear all;
tic;

global k1 k2 ;
n=0:0.01:0.5;
s=length(n);
K=zeros(s^2,3);
m=1;
for k1=0:0.01:0.5
    for k2=0:0.01:0.5
        [T,x]=ode45(@Rossler,[0,60 ...

非常之感谢  我在调试中!!
9楼2010-07-17 14:57:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

brqhl_ing

银虫 (小有名气)

引用回帖:
Originally posted by free--fire at 2010-07-17 10:57:57:

function help100716()

clc;
clear all;
tic;

global k1 k2 ;
n=0:0.01:0.5;
s=length(n);
K=zeros(s^2,3);
m=1;
for k1=0:0.01:0.5
    for k2=0:0.01:0.5
        [T,x]=ode45(@Rossler,[0,60 ...



这个是我把 k1 k2 n 的值改为0.04 时出的图 感觉有点不对! 取值太大计算时间太长。所以我改了下 就出现这样的图了
10楼2010-07-18 09:15:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 brqhl_ing 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[公派出国] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 5lbyq5wrhb 2026-02-07 4/200 2026-02-08 08:47 by vs90ilomwc
[考博] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 5lbyq5wrhb 2026-02-07 4/200 2026-02-08 08:46 by vs90ilomwc
[论文投稿] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 3rkserf6qr 2026-02-07 5/250 2026-02-08 08:32 by vs90ilomwc
[硕博家园] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 3rkserf6qr 2026-02-07 4/200 2026-02-08 08:27 by vs90ilomwc
[硕博家园] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +5 2h7du0nuhk 2026-02-07 6/300 2026-02-08 08:26 by vs90ilomwc
[考博] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +5 2h7du0nuhk 2026-02-07 6/300 2026-02-08 08:12 by vs90ilomwc
[硕博家园] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 6/300 2026-02-08 08:07 by vs90ilomwc
[考博] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 7/350 2026-02-08 08:06 by vs90ilomwc
[教师之家] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 7/350 2026-02-08 07:52 by vs90ilomwc
[公派出国] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 8/400 2026-02-08 07:32 by vs90ilomwc
[考博] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 8/400 2026-02-08 07:27 by vs90ilomwc
[硕博家园] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 8/400 2026-02-08 07:07 by vs90ilomwc
[硕博家园] 博士延得我,科研能力直往上蹿 +8 偏振片 2026-02-02 8/400 2026-02-08 06:52 by liyeqik
[教师之家] 有院领导为了换新车,用横向课题经费买了俩车 +7 瞬息宇宙 2026-02-04 7/350 2026-02-07 21:47 by tfang
[有机交流] 酰胺脱乙酰基 10+5 chibby 2026-02-03 12/600 2026-02-07 19:29 by 江东闲人
[基金申请] 同年申请2项不同项目,第1个项目里不写第2个项目的信息,可以吗 +4 hitsdu 2026-02-06 4/200 2026-02-07 13:07 by jurkat.1640
[基金申请] 有时候真觉得大城市人没有县城人甚至个体户幸福 +9 苏东坡二世 2026-02-04 10/500 2026-02-07 12:37 by 小毛球
[考博] 天津大学招2026.09的博士生,欢迎大家推荐交流(博导是本人) +4 a793625982 2026-02-05 5/250 2026-02-07 10:57 by a793625982
[基金申请] 面上项目申报 +3 Tide man 2026-02-01 3/150 2026-02-05 22:56 by god_tian
[教师之家] 遇见不省心的家人很难过 +18 otani 2026-02-03 22/1100 2026-02-04 11:06 by tangmnt
信息提示
请填处理意见