ln.m

来自「Matlab写的求最短路径的程序！欢迎大家使用！」· M 代码 · 共 27 行

function [P]=ln(DATA,C_num)    %逐步逼近法

P=[];        %距离矩阵

[row rank]=size(DATA);
for i=1:C_num
    
    if i==1  %等于1时进行数据初始化
        P=[P,DATA(1,:)'];
    else     %不等于1时进行叠代
        P=[P,zeros(row,1)];
        for j=1:row
        a=P(:,(i-1));
        b=DATA(:,j);
        c=a+b;
        P(j,i)=min(c);            
        end
    end
    
    if i>1  %判断是否相等
      d=P(:,(i-1))==P(:,i);
      if min(d)==1
        break;
      end
    end
    
end