文件:Untitled.m 行:8 列:40 不是所需的 MATLAB 表达式？

qpggup

clc
8 @4 O9 _; v! c% aclear all
! n0 W9 H# p- k- Mclose all
  Z1 f# M- \, F9 u) [7 v/ s%% 画出函数图
figure(1);
lbx=-2;ubx=2;
4 L3 b5 f9 b) x+ J8 Flby=-2;uby=2;
4 u! n$ b9 }) o$ |) e  Uezmesh('y*sin(2*pi*x)+x*cos(2*pi*y)',[1bx,ubx,1by,uby],50);
  F' j3 i1 R$ K) K( Chold on;
%% 定义遗传算法参数
# h, O. L  m/ a; k7 E6 zNIND=40;
  w5 D# |( ?1 l2 g+ d7 F) M4 RMAXGEN=20;
PRECI=20;
4 m& `: S$ o& A! n' j* m( a8 oGGAP=0.95;
px=0.7;
3 _4 o3 C3 E! h4 F& x7 v, J7 w3 kpm=0.01;
trace=zeros(3,MAXGEN);
4 @7 p9 O) r2 }FieldD=[PRECI PRECI;lbx 1by;ubx uby;1 1;0 0;1 1;1 1];
$ P% w) v: j9 M4 g* l( a( M  yChrom=crtbp(NIND,PRECI*2);
%% 优化
! M5 k  Q! a, A4 W; s$ F1 \gen=0;
1 \" U4 i0 O4 C0 N. a/ |X=bs2rv(Chrom,FieldD);
X=XY(:,1);Y=XY(:,2);
9 [) k/ h  c6 K3 E% f' iObjV=Y.*sin(2*pi*X)+X.*cos(2*pi*Y);
  T, R, i8 j8 W6 b* bwhile gen<MAXGEN
FitnV=ranking(-ObjV);
  W+ y8 g4 e! U) a0 @8 F& ISelCh=select('sus',Chrom,FitnV,GGAP);
SelCh=recombin('xovsp',SelCh,px);
SelCh=mut(SelCh,pm);
X=bs2rv(SelCh,FieldD);
( o/ I6 X+ j1 F" F# BX=XY(:,1);Y=XY(:,2);
8 ^* A" H3 u7 L( G' b% ]( b8 ]ObjVSel=Y.*sin(2*pi*X)+X.*cos(2*pi*Y);
[Chrom,ObjV]=reins(Chrom,SelCh,1,1,ObjV,ObjVSel);
X=bs2rv(Chrom,FieldD);
, g) {: ^* @( M" @8 B# Ggen=gen+1;
2 x! B  N# u) i%获取每代的最优解及其序号，Y为最优解，I为个体的序号
! j3 Z$ g9 k8 e# G/ I" X# e[Y,I]=min(ObjV);
& y6 y1 P+ o1 y# J/ R' Qtrace(1,2,gen)=XY(I,;
) T4 O" }( Q! Qtrace(3,gen)=Y;
end
$ `$ e/ }! w- E3 Xplot3(trace(1,,trace(2,,trace(3,:),'bo');
- G# ^4 l, Q2 i# J3 w1 `grid on;
9 e" G. n8 ^1 \6 uplot3(XY(:,1),XY(:,2),ObjV,'bo');
hold off
%% 画进化图
) O+ w* d; L2 v2 Bfigure(2);
plot(1:MAXGEN,trace(3,:));
9 D( p. N- C1 O1 wgrid on
xlabel('遗传代数')
; ]  b4 l$ m7 a0 |4 ^- ~* Eylabel('解的变化')
) B# ?1 V+ t# A: gtitle('进化过程')
! f2 Y/ d1 n, K9 F( \2 K* EbestZ=trace(3,end);
bestY=trace(2,end);
- L. k6 M7 m: p& {bestX=trace(1,end);
fprintf(['最优解:\nX=',num2str(bestX),'\nY=',num2str(bestY),'\nZ=',num2str(bestZ),'\n'])

relchhiclty

1bx和1by里面的数字1改成小写字母l（L的小写），这样才跟6和7行的相同啊