adapting.m

来自「一个ACO实验程序」· M 代码 · 共 30 行

%回路长度计算

for i=1:ant_n
    dis=0;
    dis_sum=0;
    x1=0;
    x2=0;
    y1=0;
    y2=0;
    
    for j=1:(city_n-1)      %计算前段距离
        x1=pos(tobu(i,j),1);     %相邻两点的坐标
        y1=pos(tobu(i,j),2);
        x2=pos(tobu(i,j+1),1);
        y2=pos(tobu(i,j+1),2);
        dis=sqrt((x1-x2)^2+(y1-y2)^2);
        dis_sum=dis_sum+dis;    %距离累积
    end
    % 计算最后一个城市回到第一个城市的距离
    x1=pos(tobu(i,1),1);
    y1=pos(tobu(i,1),2);
    x2=pos(tobu(i,city_n),1);
    y2=pos(tobu(i,city_n),2);
    dis=sqrt((x1-x2)^2+(y1-y2)^2);
    dis_sum=dis_sum+dis;    %距离累积
    
    adapt(i)=dis_sum;
end

adapt_ave(G)=mean(adapt);