%?cluster_iris1
%?data:2018.04.06
%?author:?王恰
%?使用對分法在IRIS數(shù)據(jù)集上實現(xiàn)聚類

%close?all;?clear;?clc;
data?=?load（‘iris.txt‘）;
X?=?data（:?1:4）;
Y?=?data（:?5）;
[m?n]?=?size（X）;
Index?=?（1:?m）;
G1?=?X;??%?初始化G1
G2?=?[];?%?初始化G2
G3?=?[];?%?初始化G3

fprintf（‘第一次對分聚類\n‘）;
[G1?G2?index1?index2?e1]?=?cluster（G1?G2?Index）;
fprintf（‘第二次對分聚類\n‘）
if?numel（index1）?>?numel（index2）
????Index?=?index1;
????[G1?G3?index1?index3?e2]?=?cluster（G1?G3?Index）;
else
????Index?=?index2;
????[G2?G3?index2?index3?e2]?=?cluster（G2?G3?Index）;
end

num1?=?size（index1?2）;
num2?=?size（index2?2）;
num3?=?size（index3?2）;
[p?class]?=?precision（X?Y?index1?index2?index3）;
class?=?class-1;
fprintf（‘分解聚類所分的三類標簽及個數(shù)分別為：%d:%d%d:%d%d:%d\n‘?class（1）num1class（2）num2class（3）num

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

?????文件?????537696??2018-05-16?22:04??模式識別-iris數(shù)據(jù)集聚類實驗報告及代碼\A聚類作業(yè)實驗報告.doc

?????文件???????3053??2018-04-13?15:59??模式識別-iris數(shù)據(jù)集聚類實驗報告及代碼\cluster_iris1.m

?????文件???????3802??2018-04-13?20:40??模式識別-iris數(shù)據(jù)集聚類實驗報告及代碼\cluster_iris_cmeans.m

?????文件???????3975??2018-04-12?14:56??模式識別-iris數(shù)據(jù)集聚類實驗報告及代碼\iris.txt

?????文件????????989??2018-04-12?21:28??模式識別-iris數(shù)據(jù)集聚類實驗報告及代碼\iris_visulization.m

?????目錄??????????0??2018-05-16?22:04??模式識別-iris數(shù)據(jù)集聚類實驗報告及代碼

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

???????????????549515????????????????????6