数学建模社区-数学中国

标题: 数学建模————统计问题之分类/聚类(二) [打印本页]

作者: 杨利霞    时间: 2019-4-1 16:04
标题: 数学建模————统计问题之分类/聚类(二)
数学建模————统计问题之分类/聚类(二)
8 g0 Z7 T8 Y  z& Y. d3 \  首先要弄明白分类和聚类的区别:
$ E  {- p7 l! j; N     分类(判别):数据包含数据特征部分和样本标签部分,分类的目的就是判别新的数据特征到其应有的样本标签(类别)中。9 S6 M, F- k/ h5 x! {
4 \0 I" a# M0 u
      比方说,现在告诉大家一个教室里面其中一半人每个人的性别(男女),现在需要大家将另一半人中每个人的性别判断出来,因此大家首先要做的的找到区分性别的特征,然后应用到另一半人身上,将其归类。, ~/ M3 ]8 F, \0 Q8 J3 j

" Q% \0 r, K6 [     聚类:数据中只有数据特征,需要根据某一标准将其划分到不同的类中。1 A: ?1 u9 ^9 ~, _" I

4 Z, B7 `3 v& A) z% A     同样的,现在一个教室里面所有人都没什么标签,现在需要你将整个教室的人分为两类,那么你可以从性别、体型、兴趣爱好、位置等等角度去分析。/ A. ~1 F* V9 T+ h* m- f( [1 r& D5 b
6 M2 t  ?& }, q* R8 M
; e. U8 \4 ^; c. M1 \  r+ P. h

/ C9 P& k* z% A2 o     可以看到,分类其实跟预测差不多,只不过输出是一维的,并且还是整数,所以可以用预测中的机器学习方法来解决分类问题。而聚类则不同,一般来说,聚类需要定义一种相似度或者距离,从而将相似或者距离近的样本归为一类,常见的有:kmeans算法、分层聚类、谱聚类等。% R% b; m* u6 ?" i
/ P4 {; U7 ^' J- @4 x5 K
     对于聚类来说,除了相似性的度量之外,还有一个比较重要的是终止条件,即需要聚成多少类,一般来说,基本都是在聚类之前就设定好需要聚成多少类,其中kmeans就是先设定几个类中心,然后将与类中心相近的数据归到那一类,然后不断更新类中心,直至所有数据聚类完毕,而分层聚类则是相反,先将所有数据各自为一类,然后将相似的类合并,直至达到k类为止...( C6 z) |0 K' f3 F( Y9 e
      当然,也可以将终止条件改为当最小的距离大于某一阈值时,不再合并类(适用于分层聚类),除了这些算法,还有机器学习方法,如:自组织竞争网络(SOM),可以自行了解。6 u- X! ]6 ?! {5 k

' l7 g& O0 i9 m( c       接下来我们以分层聚类为例进行讲解,这一部分例子来自于《数学建模算法与应用》,用以辅助说明。通常来说,分层聚类有两类,一类是从上到下的分裂(即现将所有个体看做一个类,然后利用规则一步步的分裂成多个类),另一类是从下到上的合并(即先将每个个体看作一个类,然后依据规则一步步合并为一个类)。因此分层聚类最终可以得到一个金字塔结构,每一层都有不同的类别数量,我们可以选取需要的类别数量。! _( F% F, I4 r; I/ B( U# T8 X
---------------------
0 G' J, K0 [2 b$ }/ v     例子:设有5个销售员w1,w2,w3,w4,w5,他们的销售业绩由二维变量(v1,v2)描述:
0 J0 b$ R8 i8 D3 ~, @
$ T% H3 ]) l% `. z2 F
$ g3 s( _, h+ H. O0 H* @) e& i5 Y  q/ ]& v% I
     将5个人的两种数据看作他们的指标,首先,我们简单定义任意两组数据的距离为:
6 B5 K1 z+ Q2 l% k: |
; {8 u( c3 T% j" c+ _8 {) Q1 R
5 Y; a9 f0 q: C9 P5 X" S
2 s7 _/ d8 |/ F4 z; V4 ^' I9 a6 Q  y
0 I1 j* f, [+ i  f" E

/ ]8 c  y( J8 K5 b* N* v  n# `/ ^" L8 ~* |) o
     与此相对应的,当有样本归为一类后,我们要计算类间距离就又得需要一个计算方式,我们定义任意两类间的距离为两类中每组数据距离的最小值:9 ]( d9 }; Y; x% y' T/ }8 v8 J+ U2 e

; j' `% g! _' \1 b, N) F$ U
6 b; I! \6 J# r: L  t7 [4 k5 b( y' \
: S( X; N# i- a

& f7 U! H/ ]0 N1 Y3 d2 ~" d- n/ ^2 ?  S! B$ c! l& C

, m' P9 n# Y# t0 k     因此,可以得到任意两个销售员的数据距离矩阵:) r2 g* ]  N+ T# s9 ?% K% ^
7 l; R6 J- d0 \6 H/ l1 J
3 }) Q( r$ ?+ l: i8 j

0 g7 n" Y1 a7 P* m( {9 S- k0 x/ C# |Step1 首先,最相近的两组样本是w1和w2,他们的距离为1,所以先将其聚为一类;- D" C# ]9 f( V& t* G

, e. E. R: D6 k# g: S* z* ZStep2 然后,剩下的样本为{w1,w2},w3,w4,w5,我们发现除了距离1之外,最相似的是       w3,w4,他们的距离为2,所以将其聚为一类;
' [0 r. [4 {; w/ {9 B6 gStep3 然后,剩下的样本为{w1,w2},{w3,w4},w5,我们发现除了距离1,2之外,最相似的   是{w1,w2}和{w3,w4},他们的距离以 w2和w3的距离为准,距离为3,所以将这两类聚为一类;
& h& }- ?- E  n2 n# X4 gStep4 最后,剩下的样本为{w1,w2,w3,w4},w5,只剩最后两类了,所以最后一类为   {w1,w2,w3,w4,w5},类间距以w3/w4与w5的距离4为准。1 x; Q8 r7 j5 f) ]

+ X7 b  G; q2 v7 q   代码如下:%% 编程实现clc;clear;close all+ P3 ~6 c( Q! f$ t" X& M) g3 H
data = [1,0;1,1;3,2;4,3;2,5];%原始数据: X$ s+ v5 ^8 {3 ^' j
[m, ~] = size(data);/ T3 `$ f. [$ [, ?: r, B  N
d = mandist(data');%求任意两组数据的距离( _; g6 L, Y7 c/ k: U* }
d = tril(d);%取下三角区域数据
4 t* `5 @  C  A' n( g) Tnd = nonzeros(d);%去除0元素* `% D% C3 B: m% t( m. b
nd = unique(nd);%去除重复元素
/ ]! V. n* `" Y) Z6 z for i = 1 : m-1
9 d# X/ ]+ [; c0 w$ S) A2 ^     nd_min = min(nd);
) {% J! O, I" V$ i, I     [row, col] = find(d == nd_min);
! _' s4 k9 T: A/ D     label = union(row,col);%提取相似的类别. g% m- v' e+ z7 o8 L9 h' ^6 A
     label = reshape(label, 1, length(label));%将类别标签转化成行向量
; R% i& K/ C4 L. }% k2 L     disp(['第',num2str(i),'次找到的相似样本为:',num2str(label)]);
2 a% F9 {  J0 q+ w: [     nd(nd == nd_min) = [];%删除已归类的距离
# T; \. y2 T9 V     if isempty(nd)%如果没有可分的类就停止6 C% u* e/ Z+ g# E2 A. p+ n6 U/ r+ m" x
         break
5 a6 J0 \" A8 G" |, w0 B( f     end) q0 q$ F* G: S! w# [* h9 l
end
' A- @: a+ {6 `+ o8 J  t# P%% 工具箱实现
2 b) g" K; a+ G9 k$ K; nclc;clear;close all& h, {# z* U2 `9 ?
data = [1,0;1,1;3,2;4,3;2,5];%原始数据8 x6 X3 D' h. S5 ]7 Y! J
y = pdist(data,'cityblock');%计算任意两样本的绝对值距离
' \' L1 X. P- Ayc = squareform(y);%将距离转化成对称方阵8 N+ P1 U7 y  E& }# p7 H7 n! l
z = linkage(y);%生成聚类树
5 R$ i9 g6 y0 {% J[h, t] = dendrogram(z);%画出聚类树4 ?, S* s' o8 k! o* X
n = 3;%最终需要聚成多少类+ ]- Y' R, m$ b/ F( @% a2 ?0 T
T = cluster(z, 'maxclust', n);%分析当分n类时,个样本的标签
9 J( f7 `; h- X* a4 ]0 Qfor i = 1 : n0 g/ }1 p1 z' j' ~: V' b/ U  G
    label = find(T == i);
% G7 l9 H% z2 W8 r    label = reshape(label, 1, length(label));
/ `* a" A3 o8 \    disp(['第',num2str(i),'类有:',num2str(label)]);
' l1 n0 l/ Z3 z3 ^4 O# ^end
  [9 i- B' I* u$ y5 a* }    结果如下:
! b- a$ ]2 X) _1 [) K% O6 m
0 a! v: y" ^& G- l8 b% n---------------------
% e+ s. H+ {" ?' t; h+ f( ?0 b* Y, {+ n

2 `. R; ?5 E* R2 Y' h2 K
8 ^1 x- q, v' \7 o# _9 _" [5 Q* g3 v; ~8 @% t

& q& y; m9 x7 V- E$ `' b1 O6 E




欢迎光临 数学建模社区-数学中国 (http://www.madio.net/) Powered by Discuz! X2.5