function?[C?new_u?iter]?=?Kmeans（data?k）?
%?該程序?qū)ata聚類，k類
%?從data中隨機(jī)選擇k個樣本作為初始均值向量{u1u2}

[row?col]?=?size（data）;?%row為樣本個數(shù)（行數(shù)），col為維數(shù)（列數(shù)）。
%隨機(jī)抽取樣本點(diǎn)作為初始中心的向量。
rand（‘seed‘?9）;
num?=?randsample（length（data）?k?‘false‘）;
u?=?zeros?*?data（num?:）;
new_u?=?data（num?:）;
%初始化元胞，和迭代次數(shù)。
C?=?cell（1?k）;
iter?=?1;
while（new_u~=u）
????u=new_u;C=cell（1k）;
????for?i=1:k
????????%計算每一個樣本點(diǎn)與中心的歐式距離
????????dist（:i）=sqrt（sum（（data-repmat（u（i:）row1））.^22））;
????end
????for?j=1:row
????????index=find（dist（j:）==min（dist（j:）））;
????????C{1index}=[C{1index};data（j:）];
????end
????for?i=1:k
????????new_u（i:）=sum（C{1i}）/length（C{1i}）;
????end
????iter=iter+1;?%迭代次數(shù)
end
%?KmeansPlot（Cnew_uk）;?%?畫圖

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件?????100510??2018-10-24?19:37??PCA_ME\24個樣本.xlsx

?????文件?????113331??2018-10-24?19:37??PCA_ME\28個樣本.xlsx

?????文件????????826??2018-10-25?19:19??PCA_ME\Kmeans.m

?????文件???????2179??2018-10-26?14:34??PCA_ME\KMeans1.m

?????文件?????811793??2018-10-25?18:15??PCA_ME\matlab練習(xí)程序（k-means聚類）?-?Dsp?Tian?-?博客園.pdf

?????文件???????6063??2018-10-26?14:25??PCA_ME\pca_me.m

?????目錄??????????0??2018-10-26?14:36??PCA_ME

-----------?---------??----------?-----??----

??????????????1034702????????????????????7