《Dijkstra最短路算法通用Matlab程序.docx》由会员分享，可在线阅读，更多相关《Dijkstra最短路算法通用Matlab程序.docx（1页珍藏版）》请在三一办公上搜索。
Dijkstra最短路算法通用Matlab程序Dijkstra最短路算法通用Matlab程序 %dijkstra最短路算法通用程序，用于求从起始点s到其它各点的最短路 %D为赋权邻接矩阵，d为s到其它各点最短路径的长度，DD记载了最短路径生成树 function d,DD=dijkstra_aiwa(D,s) m,n=size(D); d=inf.*ones(1,m); d(1,s)=0; dd=zeros(1,m); dd(1,s)=1; y=s; DD=zeros(m,m); DD(y,y)=1; counter=1; while length(find(dd=1)m for i=1:m if dd(i)=0 d(i)=min(d(i),d(y)+D(y,i); end end ddd=inf; for i=1:m if dd(i)=0&d(i)ddd ddd=d(i); end end yy=find(d=ddd); counter=counter+1; DD(y,yy(1,1)=counter; DD(yy(1,1),y)=counter; y=yy(1,1); dd(1,y)=1; end
