自动进行八数码问题的最优求解，可以显示步数和过程中的数组状态，matlab源码

%上下左右移动操作 function open=expend(op,cl,f,dis) global i; [x,y]=find(f.con==0); if x==1&&y==1 open=rt(f,op,cl,dis); open=dn(f,open,cl,dis); elseif x==1&&y==2 open=lt(f,op,cl,dis); open=rt(f,open,cl,dis); open=dn(f,open,cl,dis); elseif x==1&&y==3 open=lt(f,op,cl,dis); open=dn(f,open,cl,dis); elseif x==2&&y==1 open=up(f,op,cl,dis); open=rt(f,open,cl,dis); open=dn(f,open,cl,dis); elseif x==2&&y==2 open=lt(f,op,cl,dis); open=up(f,open,cl,dis); open=rt(f,open,cl,dis); open=dn(f,open,cl,dis); elseif x==2&&y==3 open=lt(f,op,cl,dis); open=up(f,open,cl,dis); open=dn(f,open,cl,dis); elseif x==3&&y==1 open=up(f,op,cl,dis); open=rt(f,open,cl,dis); elseif x==3&&y==2 open=lt(f,op,cl,dis); open=up(f,open,cl,dis); open=rt(f,open,cl,dis); elseif x==3&&y==3 open=lt(f,op,cl,dis); open=up(f,open,cl,dis); end end function open=rt(f,op,cl,dis) global e; e=e+1; s=f; [x,y]=find(s.con==0); t=s.con(x,y+1); s.con(x,y+1)=0; s.con(x,y)=t; s.num=e; op(e).con=s.con; op(e).prev=f.con; op(e).num=e; op(e).fuc=valuefuc(s,dis); search(s,op,cl); open=op; end function open=up(f,op,cl,dis) global e; e=e+1; s=f; [x,y]=find(s.con==0); t=s.con(x-1,y); s.con(x-1,y)=0; s.con(x,y)=t; s.num=e; op(e).con=s.con; op(e).prev=f.con; op(e).num=e; op(e).fuc=valuefuc(s,dis); search(s,op,cl); open=op; end function open=lt(f,op,cl,dis) global e; e=e+1; s=f; [x,y]=find(s.con==0); t=s.con(x,y-1); s.con(x,y-1)=0; s.con(x,y)=t; s.num=e; op(e).con=s.con; op(e).prev=f.con; op(e).num=e; op(e).fuc=valuefuc(s,dis); search(s,op,cl); open=op; end function open=dn(f,op,cl,dis) global e; e=e+1; s=f; [x,y]=find(s.con==0); t=s.con(x+1,y); s.con(x+1,y)=0; s.con(x,y)=t; s.num=e; op(e).con=s.con; op(e).prev=f.con; op(e).num=e; op(e).fuc=valuefuc(s,dis); search(s,op,cl); open=op; end