回复：=== 蚁群算法源代码大全 ===

楼主威武！！但是下下来有很多文件，本人程序基础不太好，不知该怎么看啊 ！！
帮帮忙吧。。

进不了，密码被改了....

我刚验证过，可以进。你肯定是输错密码了。

大家好！
   急求蚁群算法在车间调度问题（job-Shop）的C，C++或者java的源代码。
   非常感谢你的帮助！
如果可以，希望你能发到邮箱949776229@qq.com或者帖上回复我。
再次感谢！

用过楼主资源的人特意回来顶帖

谢谢分享，已转发至我的信箱。

楼主，我在写蚁群系统，请问可以怎么改进或优化呢？能给小弟一点建议吗？

我想请教一下，公交线路用蚁群算法来选择，知道各节点间的距离，一次性选择几条不重复的线路怎么编程，我现在只能做到最终的结果是一条线路覆盖了所有的点，而我想要的几条线路，我的邮箱dwspartacus@hotmail.com

楼主，能不能帮我改改原代码。。。？？/

[Path,PD,PB,W,xxxx,TABU,DD,D]=mutation(Path,PD,PB,W,xxxx,TABU,DD,D);
%第六步：依据变异后的路径执行二次蚂蚁搜索
[DD,BB,Path,PD,PB,W,TABU,xxxx,hegeDelays,hegePaths,hegeResources,zuiyouPaths,zuiyouDelays,zuiyouResources,paths,delays,resources,HP,fitness,iii]=ACA_Proc(DD,BB,Path,PD,PB,W,TABU,vs,vd,Tau,Alpha,Beta,Gamma,B,D,k,m,N,Daikuan,Yanshi,canshuA,canshuB,Q,Rho,iii,hegeDelays,hegePaths,hegeResources,zuiyouPaths,zuiyouDelays,zuiyouResources,paths,delays,resources,HP,fitness);
end
%--------------------------------------------------------------------
for m=(M1+1):(M2+M1)
%第七步：逆向搜素状态初始化
DD=D;%延时邻接矩阵（N×N）备份
BB=B;%带宽邻接矩阵（N×N）备份
vs=vdbf;%终点和源点互换
vd=vsbf;
W=vs;%当前节点初始化为源节点
Path=vs;%爬行路线初始化
PD=[];%爬行路线延时初始化
PB=[];%爬行路线带宽初始化
TABU=ones(1,N);%禁忌表初始化
TABU(vs)=0;%排除初始点
%第八步：执行逆向蚂蚁搜素
[DD,BB,Path,PD,PB,W,TABU,xxxx,hegeDelays,hegePaths,hegeResources,zuiyouPaths,zuiyouDelays,zuiyouResources,paths,delays,resources,HP,fitness,iii]=ACA_Proc(DD,BB,Path,PD,PB,W,TABU,vs,vd,Tau,Alpha,Beta,Gamma,B,D,k,m,N,Daikuan,Yanshi,canshuA,canshuB,Q,Rho,iii,hegeDelays,hegePaths,hegeResources,zuiyouPaths,zuiyouDelays,zuiyouResources,paths,delays,resources,HP,fitness);
%第九步：对目前找到的链路进行变异
[Path,PD,PB,W,xxxx,TABU,DD,D]=mutation(Path,PD,PB,W,xxxx,TABU,DD,D);
%第十步：依据变异后的路径执行二次蚂蚁搜索
[DD,BB,Path,PD,PB,W,TABU,xxxx,hegeDelays,hegePaths,hegeResources,zuiyouPaths,zuiyouDelays,zuiyouResources,paths,delays,resources,HP,fitness,iii]=ACA_Proc(DD,BB,Path,PD,PB,W,TABU,vs,vd,Tau,Alpha,Beta,Gamma,B,D,k,m,N,Daikuan,Yanshi,canshuA,canshuB,Q,Rho,iii,hegeDelays,hegePaths,hegeResources,zuiyouPaths,zuiyouDelays,zuiyouResources,paths,delays,resources,HP,fitness);
end
%----------------------------------------------------------------------
%第十一步：更新信息素
Delta_Tau=zeros(N,N);%更新量初始化
for m=1:M
if resources(k,m)<inf&delays(k,m)<Yanshi
ROUT=paths{k,m};
TS=length(ROUT)-1;%跳数
Cpkm=resources(k,m);
for s=1:TS
x=ROUT(s);
y=ROUT(s+1);
Delta_Tau(x,y)=Delta_Tau(x,y)+Q/Cpkm;
Delta_Tau(y,x)=Delta_Tau(y,x)+Q/Cpkm;
end
end
end
Tau=(1-Rho).*Tau+Delta_Tau;%信息素挥发一部分，新增加一部分
end
%第十二步：整理输出结果
%对于以终点开头的通路执行行逆转。
l=size(hegePaths);
for i=1:l(1)
hegePathsline=hegePaths(i,:);
hegePathsline1=hegePathsline(1);
if hegePathsline1==vdbf
inverhegePaths=fliplr(hegePaths(i,:));%行逆转
hegePaths(i,:)=inverhegePaths;
end
end
allround=hegePaths
[va,vb]=max(hegeResources);
if length(va)==0
va=1;
zuiyouResources=0
else
zuiyouResources=va
loc=vb
F=1/va
end
zuiyouPaths=hegePaths(vb,:)
zuiyouDelays=hegeDelays(vb)
toc
%第十一步：绘制曲线
%figure(1)
%for ii=1:M%整理输出结果
%for jj=1:M
%if resources(ii,jj)==inf
%resources(ii,jj)=0;
%end
%end
%end
%DiedaiNummaxfitness=zeros(M,DiedaiNum);
%for k=1:DiedaiNum
%DiedaiNummaxfitness(k,:)=max(resources(k,:));
%end
%plot(DiedaiNummaxfitness,'b-')
%hold on


运行不出来额，哪位高手麻烦改改。

给我一份物流的吧，谢谢了。邮箱whchuan1986@126.com

有关多配送中心的路径优化有没有呢？高手，我的邮箱是whchuan1986@126.com，谢谢了

顶一下，谢谢楼主了，希望也在邮箱里加入设施规划的蚁群算法吧~