gusucode.com > 《模式识别与智能计算》matlab源代码 > 《模式识别与智能计算》matlab源代码/《模式识别与智能计算》部分函数的源程序/书程序/第9章/dis1.m

    function y=dis1(x1,x2) 
if size(x1,1)~=1   %要考虑到可能只有一个样品，否则会出错
   m1=mean(x1);    %类中心
else
   m1=x1;
end
if size(x2,1)~=1   %要考虑到可能只有一个样品，否则会出错
   m1=mean(x2);    %类中心
else
   m2=x2;
end
y=0;
for i=1:size(x1,2)
    y=y+(m1(1,i)-m2(1,i))^2;%各样品到类中心的距离
end