c_zuilinjin.m

用matlab实现聚类算法

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%函数名称: C_ZuiLinJin()
% 参数：m_pattern:样品特征库；patternNum:样品数目
% 返回值:m_pattern:样品特征库
% 函数功能:按照最临近规则对全体样品进行分类
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
function [m_pattern]=C_ZuiLinJin(m_pattern,patternNum)
m_center(1).feature=m_pattern(1).feature;        %将第一个样品作为第一个中心
m_center(1).index=1;
m_center(1).patternNum=1;
m_pattern(1).category=1;
centerNum=1;

disType=DisSelDlg();  %选择距离类型
T=InputThreshDlg(m_pattern,patternNum,disType) %获取阈值
for i=1:patternNum
    centerdistance=inf;
    index=1;
    for j=1:centerNum
        dis=GetDistance(m_pattern(i),m_center(j),disType);
        if(dis<centerdistance)
            centerdistance=dis;
            index=j;
        end
    end
    if(centerdistance<T) %距离小于阈值，则将样品归入该类
        m_pattern(i).category=m_center(index).index;
        m_center(index).patternNum= m_center(index).patternNum+1;
        m_center(index)=CalCenter(m_center(index),m_pattern,patternNum);
    else
        centerNum=centerNum+1;
        m_pattern(i).category=centerNum;
        m_center(centerNum).feature=m_pattern(i).feature;
        m_center(centerNum).index=centerNum;
        m_center(centerNum).patternNum=1;
    end
end