matlab层次聚类算法

%生成20个随机样本 %屏幕输出Q型聚类结果 %屏幕输出R型聚类结果 包含具体聚类步骤和算法，自写函数体

function [linkZ] = array_Z（cosin）
%UNtitleD Summary of this function goes here
%   Detailed explanation goes here

[lncol]=size（cosin）;
linkZ=zeros（ln-13）;%用于生成谱系图的矩阵
tag=zeros（ln2）;%标识符，样本是否已经加入谱系中
n=1;
newNo = ln+1;%新节点序号
while n    [ij]=find（cosin==max（max（cosin）））;
    cosin（ij）=0;
    if （tag（i2）~=tag（j2）||tag（i2）==0）||tag（j2）==0
        if tag（i1）==1
            i=tag（i2）;
            tag（tag==i）=newNo;
        end
        if tag（j1）==1
            j=tag（j2）;
            tag（tag==j）=newNo;
        end
        tag（i:）=[1 newNo];
        tag（j:）=[1 newNo];
        linkZ（n:）=[j i 1-max（max（cosin））];%这里用1减去cosin值，是为了方便后面的谱系树输出
        n=n+1;
        newNo = newNo+1;
    end
end

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     文件         789  2016-01-06 13:34  层次聚类代码\array_Z.m
     文件         563  2016-01-06 13:31  层次聚类代码\cosindis.m
     文件        1024  2016-01-06 14:21  层次聚类代码\main.m
     目录           0  2016-07-18 10:50  层次聚类代码\