最短路径的matlab程序

function dijkstracalc
w =demo1;
n=size（w1）;
w1=w（1:）;

for i=1:n
    l（i）=w1（i）;
    z（i）=1;
end
s=[];
s（1）=1;
u=s（1）;
k=1;

while k    for i=1:n
       for j=1:k
           if i~=s（j）
               if l（i）>l（u）+w（ui）
                  l（i）=l（u）+w（ui）;
                  z（i）=u;
               en