clear;clc;A=[1 2 3 4; 2 5 3 6; 7 6 8 9;1 8 4 2]B=zeros(9);[M,N]=size(A);for m=1:N for n=1:N-1 B(A(m,n),A(m,n+1))=1; B(A(m,n+1),A(m,n))=1;%我认为1与2相邻则2也与1相邻,如果不是,把这句去掉即可 endendB