基于遗传算法得ＴＳＰ算法mａtlａｂ代码主程序:ｃlc;ｃleａraｌl;ｃloseall;glｏbａlxyｘ=[0３154037９1０14171４121０1９2６1１15７222１２7１5152０21242528］;ｙ＝[02547８１19６2０3６912９161817１2１450919141713２０１6１8];a＝［８8、２6５、５３4、５7、２2、31、46、54、112、75、８３、8３、43、５5、８7、5７、８４、6６、26、8２、4７、69、６１012６８、14、2]；ｈ=０:30；t=３1＋1;%送货点数s=1500;%初始中群数Ｇ=50０;%最大迭代次数c=25;%一次选取25个样本pc=0、80;%交配率ｐｍ=0、01;％变异率pop=ｚｅros（s,t);ｆori=1：ｓpop(i,1：t-１)=rａndpｅrm(t－１);%初始化种群eｎdfork=1：1:G％GA开始¼ifmod(k,5０)==１kendpop=diｓtanｃe1(pop);%调用距离函数pｏp＝ｓeｌect(poｐ,c)；%调用选择函数p1=rand;iｆp1>=pcpop=cｒｏsｓ(poｐ)；%调用交配函数eｎdｐ2=rand;ifp２>=pmpop=mｕｔａte(pop);%调用变异函数eｎdeｎd%ＧA结束%%％%%％％%％%%%%%％％%%%％%%%％％％％%％%％%%%%%%%%%％%％%%%％%％%%％％%%%％％%％％％%%％%%%%％％％%%%％%%％%beｓtL＝min（pop(:，t)）Ｊ=pop（：,ｔ);ｆｉ＝1、/Ｊ；[Oderfi,Ｉndexfｉ］=sort(fｉ);%对fi进行排序ＢestS＝ｐop（Indｅｘｆi(s),:）;%得到最短路径Ｉ=ＢｅsｔＳ；forｉ=1:１:t－1x1(i)=x(I(i))；y1(i)=ｙ（Ｉ(i））;ｅndx1(t)＝x(I(1）);ｙ1(t)＝y(Ｉ（1）);citｉes＿ｎew＝[x1;y1];ｄｉｓp('BestＲoｕtｅis：');ｄisp(citｉes_new）；pｏs=[citｉes_neｗcities＿neｗ(:,１)］;leｎtemp=0;fori=1:1:t-1ｔｅｍp=(ａbs（ｐｏs（１,i)－pos（1,ｉ+１))+abs(pos(２，i)-ｐoｓ(2,i+1））);lentｅmp=lentｅmp+temp；enddｉsp(＇ＳhｏrtｅstLeｎgthis:')；ｄisｐ(lｅｎｔemp);ｐlｏｔ(x1，y１,＇-or');xｌａbel('Xaxｉs')，ylaｂｅl('Yａxiｓ＇),tｉｔle('最短路径'）；axｉｓ([０,1,0,1]);aｘis（［0,30,0,２０]);axisoｎ距离函数mａｔlab代码:fｕncｔiｏn[pｏp]=ｄiｓtａnce1(ｐop)gｌｏｂaｌxｙ[s，t]=siｚｅ(pop)；forｉ=1:1:ｓdｄ=0;pos＝pｏp(i,１：ｔ-1);pｏs=［poｓpｏs（:,１)];fｏrｊ=1:1：t－1m=pos(j);ｎ=pｏs(j+1）;dd=dｄ+(abs(ｘ（m)-x（n))+abs(y(m)-ｙ(n)）)；eｎdpop(i,t)=dd;ｅnd选择函数mａｔlaｂ代码:ｆuｎction[ｐop]=select（pｏp,ｃ）[s，t]=size(ｐop);m11＝(poｐ（:,t));m１1=ｍ11';mmax=zｅｒos（1，c);ｍmｉｎ=zeｒoｓ（1,c）；nｕm=１；whiｌenum<c＋１%取距离大得C个样本[a,mmax(num）]＝ｍax(ｍ11);m11(mmaｘ（ｎuｍ)）=０;ｎum=num＋１;endnum=1；wｈileｎum＜ｃ+1%取距离小得C个样本[b，ｍmin(ｎum）]＝min(m11);m1１（ｍｍｉn（num)）=a;ｎum=nuｍ+1;endforｉ=1:ｃpop(mmax(ｉ)，:)=pｏp(mmin(ｉ)，:）;end交配函数matlab代码：functioｎ[pop]=cｒｏｓs（poｐ)[s,t]=ｓize(ｐop）;ｐｏp_1=ｐop;ｎ＝rａnｄｐerm(s);%将种群随机排序fori=1:２:s%随机选择两个交叉点ｍ=raｎdｐerｍ(t-3)+1；crｏsspoint(1)＝mｉｎ(m(1)，m（2));crosspoinｔ(2)=mａx（ｍ（１)，m(2)）;%任意两行交叉x１=n（i);x2=n(i+１）；％将