1、最大最小距離算法函數(shù)：function pattern=maxmin(x)maxdistance=0;index=1;%相當(dāng)于指針指示新中心點(diǎn)的位置k=1;%中心點(diǎn)計(jì)數(shù)，也即是類別center=zeros(size(x);%保存中心點(diǎn)patternnum=size(x,1);%輸入的數(shù)據(jù)數(shù)distance=zeros(patternnum,3);%求距離min=zeros(patternnum,1);%取較小距離pattern=(patternnum);%表示類別center(1,:)=x(1,:);pattern(1)=1;for i=2:patternnum distance(i,1)=s

2、qrt(x(i,:)-center(1,:)*(x(i,:)-center(1,:)');%歐氏距離 min(i,1)=distance(i,1); pattern(i)=1; if(maxdistance<distance(i,1) maxdistance=distance(i,1); index=i; endendk=k+1;center(k,:)=x(index,:);pattern(index)=2;min(index,1)=0;while 1 for i=2:patternnum if(min(i,1)=0) distance(i,k)=sqrt(x(i,:)-cent

3、er(k,:)*(x(i,:)-center(k,:)'); if(min(i,1)>distance(i,k) min(i,1)=distance(i,k); pattern(i)=k; end end end max=0; for i=2:patternnum if(max<min(i,1)&min(i,1)=0) % (x(i,:)=center(k,:) max=min(i,1); index=i; end end if(max>(maxdistance*0.5) k=k+1; center(k,:)=x(index,:); pattern(index

4、)=k; min(index,1)=0; else break; endend程序界面截圖如下：程序框圖如下：開始取第一個(gè)點(diǎn)為中心點(diǎn)C1求各點(diǎn)與C1的歐式距離取距C1最遠(yuǎn)的點(diǎn)為第二個(gè)中心點(diǎn)C2取最大距離maxdistance的1/2為閾值T求各點(diǎn)與Ck的歐式距離取各點(diǎn)最小距離min(i)=mindistance(i,k)distance(i,1)求所有最小距離min中的最大值maxMax> T取相應(yīng)的點(diǎn)為中心點(diǎn)Ck將樣本按最近距離劃分到相應(yīng)中心的類別結(jié)束當(dāng)輸入模式樣本，調(diào)用程序如下：x=0,0;3,8;2,2;1,1;5,3;4,8;6,3;5,4;6,4;7,5pattern=maxm

5、in(x)（1）當(dāng)選用第一點(diǎn)為中心，用matlab得出各點(diǎn)與中心點(diǎn)的距離，并分類，將運(yùn)行結(jié)果保存在EXCEL中如下：（2）與X1距離最遠(yuǎn)的X6為第二個(gè)中心點(diǎn)，用matlab得出各點(diǎn)與中心點(diǎn)的距離，離得較近的中心點(diǎn)歸為一類，將運(yùn)行結(jié)果保存在EXCEL中如下：（3）與個(gè)中心距離最遠(yuǎn)的X7為第三個(gè)中心點(diǎn)，用matlab得出各點(diǎn)與中心點(diǎn)的距離，離得較近的中心點(diǎn)歸為一類，將運(yùn)行結(jié)果保存在EXCEL中如下：（4）由于閾值T=最大距離maxdistance的0.5，而各點(diǎn)與各自中心點(diǎn)的距離min都大于閾值T，所以聚類循環(huán)工作結(jié)束。運(yùn)行結(jié)果為：pattern = 1 2 1 1 3 2 3 3 3 3表明：對(duì)于樣本x1=(0,0);x2=(3,8); x3=(2,2);