floyd.m

来自「matlab的基础应用,主要是基础部芬的学习笔记,大家看看有没有用!」· M 代码 · 共 23 行

function [d,r]=floyd(a)
              n=size(a,1);
              d=a;
              for i=1:n
                  for j=1:n
                      r(i,j)=j;
                  end 
              end 
              r
              for k=1:n
                  for i=1:n
                      for j=1:n
                          if d(i,k)+d(k,j)<d(i,j)
                              d(i,j)=d(i,k)+d(k,j);
                              r(i,j)=r(i,k)
                          end 
                      end 
                  end
                  k
                  d
                  r
              end