MPST问题MATLAB程序[参考].pdfVIP

下载本文档

5
0
约1.71万字
约 13页
2020-09-28 发布于江苏
举报
版权申诉

MPST问题MATLAB程序[参考].pdf

1、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。。
2、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击这里二次下载。
3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
4、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
5、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
6、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
7、VIP文档为合作方或网友上传，每下载1次，网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档

精品文档 ·可编辑版基于遗传算法的 TSP 算法 matlab 代码主程序： clc; clear all; close all; global x y x=[0 3 1 5 4 0 3 7 9 10 14 17 14 12 10 19 2 6 11 15 7 22 21 27 15 15 20 21 24 25 28]; y=[0 2 5 4 7 8 11 9 6 2 0 3 6 9 12 9 16 18 17 12 14 5 0 9 19 14 17 13 20 16 18]; a=[8 8.2 6 5.5 3 4.5 7.2 2.3 1.4 6.5 4.1 12.7 5.8 3.8 3.4 3.5 5.8 7.5 7.8 4.6 6.2 6.8 2.4 7.6 9.6 10 12 6 8.1 4.2]; h=0:30; t=31+1; %送货点数 s=1500; %初始中群数 G=500; %最大迭代次数 c=25; %一次选取25个样本 pc=0.80; %交配率 pm=0.01; %变异率 pop=zeros(s,t); for i=1:s pop(i,1:t-1)=randperm(t-1); %初始化种群 end for k=1:1:G %GA开始¼ if mod(k,50)==1 k end pop=distance1(pop); %调用距离函数 pop=select(pop,c); %调用选择函数 p1=rand; if p1=pc pop=cross(pop); %调用交配函数 end p2=rand; if p2=pm pop=mutate(pop); %调用变异函数 end end %GA结束 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 1 / 13 精品文档 ·可编辑版 %%%%%%%%%%%%% bestL=min(pop(:,t)) J=pop(:,t); fi=1./J; [Oderfi,Indexfi]=sort(fi); %对fi进行排序 BestS=pop(Indexfi(s),:); %得到最短路径 I=BestS; for i=1:1:t-1 x1(i)=x(I(i)); y1(i)=y(I(i)); end x1(t)=x(I(1)); y1(t)=y(I(1)); cities_new=[x1;y1]; disp(Best Route is:);disp(cities_new); pos=[cities_new cities_new(:,1)]; lentemp=0; for i=1:1:t-1 temp=(abs(pos(1,i)-pos(1,i+1))+abs(pos(2,i)-pos(2,i+1))); lentemp=lentemp+temp; end disp(Shortest Length is:);disp(lentemp); plot(x1,y1, -or); xlabel(X axis), ylabel(Y axis), title(最短路径 ); axis([0,1,0,1]); axis([0,30,0,20]); axi