chushijulizhen.m

来自「有兴趣学系matlab的朋友」· M 代码 · 共 13 行

function y=chushijulizhen(x)
[m n]=size(x);
y=zeros(n,n);
for m=1:n
    for k=m+1:n
        y(m,k)=abs(x(m)-x(k));    %  欧氏距离
    end
end
y=y+y';
for m=1:n
    y(m,m)=100;
end