一维有序序列聚类分析源代码

%输入序列为s0
clc
clear
s0=[9.3 1.8 1.9 1.7 1.5 1.3 1.4 2.0 1.9 2.3 2.1]; 
l=11;
s=zeros（ll）;
jilu=zeros（l1）;
jiedian=zeros（ll）;
p=zeros（ll）;
%赋值
for i=1:l
    for j=i+1:l
          temp=0;
        for z=i:j
          temp=temp+s0（z）;
        end
         p0=j-i+1;           
          xmean=temp/p0;
       for t=i:j          
           s（ij）=s（ij）+（s0（t）-xmean）^2;
       end
    end
end

   %initial
    k=2; 
    for m=k+1:l
    for j=1:l
    jilu（j）=1000;
    end
    f