TSP問題遺傳算法matlab源程序3頁_第1頁
TSP問題遺傳算法matlab源程序3頁_第2頁
TSP問題遺傳算法matlab源程序3頁_第3頁
全文預(yù)覽已結(jié)束

下載本文檔

版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請進行舉報或認領(lǐng)

文檔簡介

1、TSP問題遺傳算法matlab源程序%TSP問題(又名:旅行商問題,貨郎擔(dān)問題)遺傳算法通用matlab程序%D是距離矩陣,n為種群個數(shù),建議取為城市個數(shù)的12倍,%C為停止代數(shù),遺傳到第 C代時程序停止,C的具體取值視問題的規(guī)模和耗費的時間而定%m為適應(yīng)值歸一化淘汰加速指數(shù) ,最好取為1,2,3,4 ,不宜太大%alpha為淘汰保護指數(shù),可取為01之間任意小數(shù),取1時關(guān)閉保護功能,最好取為0.81.0%R為最短路徑,Rlength為路徑長度function R,Rlength=geneticTSP(D,n,C,m,alpha)N,NN=size(D);farm=zeros(n,N);%用于存

2、儲種群for i=1:nfarm(i,:)=randperm(N);%隨機生成初始種群endR=farm(1,:);%存儲最優(yōu)種群len=zeros(n,1);%存儲路徑長度fitness=zeros(n,1);%存儲歸一化適應(yīng)值counter=0;while counter=alpha*randnn=nn+1;FARM(nn,:)=farm(i,:);endendFARM=FARM(1:nn,:);aa,bb=size(FARM);%交叉和變異while aanif nnnFARM=FARM(1:n,:);%保持種群規(guī)模為nendfarm=FARM;clear FARMcounter=cou

3、nter+1endRlength=myLength(D,R);function a,b=intercross(a,b)L=length(a);if L=rand&L10W=ceil(L/10);elseW=floor(L/10);endp=unidrnd(L-W+1);%隨機選擇交叉范圍,從p到p+Wfor i=1:W%交叉x=find(a=b(1,p+i-1);y=find(b=a(1,p+i-1);a(1,p+i-1),b(1,p+i-1)=exchange(a(1,p+i-1),b(1,p+i-1);a(1,x),b(1,y)=exchange(a(1,x),b(1,y);endfunction x,y=exchange(x,y)temp=x;x=y;y=temp;% 計算路徑的子程序function len=myLength(D,p)N,NN=size(D);len=D(p(1,N),p(1,1);for i=1:(N-1)len=len+D(p(1,i),p(1,i+1);end%計算歸一化適應(yīng)值子程序function fitness=fit(len,m,maxlen,minlen)fitness=len;for i=1:length(len)fitne

溫馨提示

  • 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對任何下載內(nèi)容負責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

最新文檔

評論

0/150

提交評論