24小时热门版块排行榜    

查看: 192  |  回复: 0
当前主题已经存档。

someday1985

新虫 (小有名气)

[交流] 【求助】请教关于一循环语句的问题

这是我做的遗传算法主程序, 我想让popuerr小于某个值,从而退出while循环,是不最后用break语句,该怎么写呢  

psize=20;pmutate=0.3;mutatec=0.001;
cyc=0;step=ones(1,psize)*0.001;
A=rand(1,psize)+1.5;
tower=rand(1,psize)+1.0;
Sigmag=rand(1,psize)+1.0;
tg=rand(1,psize)+2.0;                                                                                                                                 
b(:,:,:,1)=A;
b(:,:,:,2)=tower;
b(:,:,:,3)=Sigmag;
b(:,:,:,4)=tg;
d=[b(:,:,:,1),b(:,:,:,2),b(:,:,:,3),b(:,:,:,4)];
popu=d';
m=d';

for o=1:1:20
n=m(:,o);
i=0;
for t=0:0.1:12;
   i=i+1;
  A=n(1,;
  tower=n(2,;
  Sigmag=n(3,;
  tg=n(4,;
Z=((t-tg)/Sigmag)-(Sigmag/tower);
     x=(-1000:0.01:Z)';
        y=(1/sqrt(6.28))*exp(-x.*x/2);
        Vt=trapz(x,y);
        V2(i)=(A/tower)*exp((Sigmag^2)/(2*tower^2)-((t-tg)/tower));
    V2(i)=V2(i)*Vt;

end
V1=dot(A,tower,tg,Sigmag);
popuerr(o)=sumsqr(V2-V1)
end
popuerr

errflow=[];
while cyc<500
        cyc=cyc+1;
        errflow=[errflow,popuerr(1)];

        popufit=fitness(popuerr);       

   parent=select(popufit);

  son1=mate(popu(:,parent));
  son2=mutate(son1,pmutate,mutatec);

son=[son1,son2];
k=son';
m=k';
for o=1:1:40
n=m(:,o);
i=0;
for t=0:0.1:12;
   i=i+1;
  A=n(1,;
  tower=n(2,;
  Sigmag=n(3,;
  tg=n(4,;
Z=((t-tg)/Sigmag)-(Sigmag/tower);
     x=(-1000:0.01:Z)';
        y=(1/sqrt(6.28))*exp(-x.*x/2);
        Vt=trapz(x,y);
        V2(i)=(A/tower)*exp((Sigmag^2)/(2*tower^2)-((t-tg)/tower));
    V2(i)=V2(i)*Vt;
end
V1=dot(A,tower,tg,Sigmag);       
sonerr(o)=sumsqr(V2-V1);
end
sonerr
sonerr=sum(sonerr);
sonfit=fitness(sonerr);
popu=[popu,son];
popufit=[popufit,sonfit];
popuerr=[popuerr,sonerr];
offspr=compet(popufit,psize);
popu=popu(:,offspr);
popuerr=popuerr(offspr);


end

plot(errflow)
disp('The optimal individual is')
popu(:,1)

[ Last edited by someday1985 on 2010-4-13 at 22:50 ]
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 someday1985 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[硕博家园] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 G6APbkg8SA6w 2026-08-29 4/200 2026-08-30 07:17 by ZPa0EcMwuECS
[考研] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +3 gy1nBQXYQJqL 2026-08-29 4/200 2026-08-30 06:57 by ZPa0EcMwuECS
[找工作] 售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急 +4 ASdOkHsho7FD 2026-08-28 8/400 2026-08-30 06:13 by ZPa0EcMwuECS
[考博] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +6 ASdOkHsho7FD 2026-08-28 10/500 2026-08-30 06:11 by ZPa0EcMwuECS
[教师之家] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +5 ASdOkHsho7FD 2026-08-28 7/350 2026-08-30 06:10 by ZPa0EcMwuECS
[论文投稿] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +5 gy1nBQXYQJqL 2026-08-29 6/300 2026-08-30 01:58 by ZPa0EcMwuECS
[考博] 售SCI-T0P文章,我:8O.5.5.1.O.54,科目齐全,可+急 +3 gy1nBQXYQJqL 2026-08-29 4/200 2026-08-30 01:34 by ZPa0EcMwuECS
[论文投稿] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +4 gy1nBQXYQJqL 2026-08-29 6/300 2026-08-30 01:25 by ZPa0EcMwuECS
[公派出国] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +5 ASdOkHsho7FD 2026-08-28 7/350 2026-08-30 01:12 by ZPa0EcMwuECS
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +4 ASdOkHsho7FD 2026-08-28 5/250 2026-08-30 00:52 by ZPa0EcMwuECS
[基金申请] 我就是申请一个面上项目而已,这评审意见是按照杰青的条件评的吧? +6 gouxfjh 2026-08-28 9/450 2026-08-29 09:59 by jklily
[基金申请] 基金不中,共勉 +11 eulota 2026-08-26 11/550 2026-08-28 14:22 by 火星超人xi
[基金申请] 基金系统什么内容也没有 30+4 winsaint 2026-08-27 9/450 2026-08-28 11:06 by maolC
[基金申请] 怎么查啊 +6 huang1991js 2026-08-26 6/300 2026-08-28 08:42 by winsaint
[文学芳草园] 梦想 +3 myrtle 2026-08-26 3/150 2026-08-27 10:01 by angelyueyi
[基金申请] 2026年的国家社科基金项目通讯评审的新规则与新动向、新挑战 +7 process2012 2026-08-23 10/500 2026-08-26 19:23 by hmhminy
[基金申请] 出来了 +9 trojank 2026-08-26 9/450 2026-08-26 14:25 by 宝贝虫子
[基金申请] 国合可查了 +3 paperzjh 2026-08-26 3/150 2026-08-26 10:41 by LemmonTr
[基金申请] 明天应该可查了!? +6 chengyan1220 2026-08-23 6/300 2026-08-25 19:45 by zfd97
[基金申请] 如果此刻你正在为国基感到焦虑,不妨来听听这首《基金之外》 +8 scalable 2026-08-24 8/400 2026-08-25 12:52 by jnhyjjm
信息提示
请填处理意见