findpath.m

根据路线查找规律

function[row,col,s]=findpath(st,ma)
[Mr,Mc]=size(ma);
S=st*ones(Mr,Mc);
c=(ma==S);
[r,l]=find(c~=0);
row=r';col=l';
s=row;