rep.m

matlab的常用函数工具包

function [f,t]=rep(g9,h9)%g9为minroute函数中的S距阵（路径距阵），h9为minroute中的总权重距阵，
                         %这个函数是配合minroute使用的
m=size(g9,2);
n=size(g9,1);t=zeros(1,m);f=[];
for j=1:m
    for i=1:n-1
         if (g9(i+1,j)==0&g9(i,j)>=1)
            v=g9(i,j);
            t(v)=h9(j);
            f(:,v)=g9(:,j);        
         end
      i=i+1;   
      if (i==n&g9(i,j)>=1)
          v=g9(i,j);
          t(v)=h9(j);
          f(:,v)=g9(:,j);  
      end  
   end
end