initial.asv

一个一群算法求解TSP问题的很好的粒子

%初始化函数
ant_n=50;
city_n=30;
NC=100;
everbest=inf;
%===================================
%第一种群数据
tobu_A(ant_n,city_n)=0;
ph_table_A(city_n,city_n)=0;
hu_table_A(city_n,city_n)=0;
a_A=1.5;
b_A=1;
dispose_A=0.2;
adapt_ave_A(NC)=0;
adapt_best_A(NC)=inf;
%====================================
%第二种群数据
tobu_B(ant_n,city_n)=0;
ph_table_B(city_n,city_n)=0;
hu_table_B(city_n,city_n)=0;
a_B=1.5;
b_B=1;
dispose_B=0.2;
adapt_ave_B(NC)=0;
adapt_best(NC)=inf;

%计算城市距离矩阵
for i=1:city_n
    for j=1:city_n
        x1=pos(i,1);
        y1=pos(i,2);
        x2=pos(j,1);
        y2=pos(j,2);
        
        dis_table(i,j)=sqrt((x1-x2)^2+(y1-y2)^2);
    end
end
for i=1:city_n
    dis_table(i,i)=inf;
end

%初始化启发式分布表
for i=1:city_n
    for j=1:city_n
        hu_table(i,j)=100/dis_table(i,j);
    end
end

%初始化信息素
for i=1:city_n
    for j=1:city_n
        ph_table(i,j)=0.5;    %额定信息素取值为0~1
    end
end