fitness.m

粒子群优化算法求解车辆路径问题

%适应度函数源程序（fitness.m）

%function result=fitness(x,D)

%sum=0;

%for i=1:D

 %   sum=sum+x(i)^2;

%end

%result=sum;

function [DLn,cityn]=tsp(n)

if n==8
    city8=[18 54;22 60;58 69;71 71;83 46;
        91 38;24 42;18 40];%8 cities d'=2.691
    for i=1:8
        for j=1:8
            DL8(i,j)=((city8(i,1)-city8(j,1))^2+(city8(i,2)-city8(j,2))^2)^0.5;
        end
    end
    DLn=DL8;
    cityn=city8;
end