% 函數 - 計算最佳個體的適應度
function bestobj(bestpop,d,outfp)

totlelen = 0;
for i = 1:length(bestpop)-1    
    totlelen = totlelen + d(bestpop(i),bestpop(i+1)); 
end
totlelen = totlelen + d(bestpop(1),bestpop(length(bestpop)));

aisfit = 100/totlelen-2;
fprintf(outfp,'    最佳個體的總路徑長度      = %8.2f\n',totlelen);

% 輸出最佳個體
fprintf(outfp,'\n  最佳個體為：\n');
fprintf(outfp,'[');
for i = 1:length(bestpop)
    fprintf(outfp,'%3.0f',bestpop(i));
end
fprintf(outfp,']');