找回密码
 注册
关于网站域名变更的通知
查看: 478|回复: 1
打印 上一主题 下一主题

基于互信息的特征选择算法MATLAB实现

[复制链接]

该用户从未签到

跳转到指定楼层
1#
发表于 2020-5-18 11:06 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式

EDA365欢迎您登录!

您需要 登录 才可以下载或查看,没有帐号?注册

x
本帖最后由 baqiao 于 2020-5-18 13:24 编辑 ) O8 d3 Q6 J  i7 D, u
) K2 F+ C' q$ A5 [5 J. s
在概率论和信息论中,两个随机变量的互信息(Mutual Information,简称MI)或转移信息(transinformation)是变量间相互依赖性的量度。不同于相关系数,互信息并不局限于实值随机变量,它更加一般且决定着联合分布 p(X,Y) 和分解的边缘分布的乘积 p(X)p(Y) 的相似程度。互信息(Mutual Information)是度量两个事件集合之间的相关性(mutual dependence)。互信息最常用的单位是bit。( i! I& A% u* i0 `  A' l
* Z. r4 K0 P0 t' I  @( Y7 h, [, w" u
互信息的定义
# Q& K0 h: e8 s. ]! e8 _2 k正式地,两个离散随机变量 X 和 Y 的互信息可以定义为:
0 E; ~5 e9 `3 ]) b! r, g# }- ?
7 H  r. \7 K9 t+ I8 j4 _& ~其中 p(x,y) 是 X 和 Y 的联合概率分布函数,而p(x)和p(y)分别是 X 和 Y 的边缘概率分布函数。
4 w7 c& o9 A5 w 2 g/ O6 \# n* W2 G
在连续随机变量的情形下,求和被替换成了二重定积分:
% [  {' q  I. x. D+ F3 `1 p 0 ]" K' E0 S' M. ^
其中 p(x,y) 当前是 X 和 Y 的联合概率密度函数,而p(x)和p(y)分别是 X 和 Y 的边缘概率密度函数。
, ]5 w2 G3 d8 b  n" ]  ^
. e1 T* |! |1 M/ r/ U互信息量I(xi;yj)在联合概率空间P(XY)中的统计平均值。 平均互信息I(X;Y)克服了互信息量I(xi;yj)的随机性,成为一个确定的量。如果对数以 2 为基底,互信息的单位是bit。
0 g% ~, b7 E7 d/ m, m
6 T) g: J9 V. I9 ^& @直观上,互信息度量 X 和 Y 共享的信息:它度量知道这两个变量其中一个,对另一个不确定度减少的程度。例如,如果 X 和 Y 相互独立,则知道 X 不对 Y 提供任何信息,反之亦然,所以它们的互信息为零。在另一个极端,如果 X 是 Y 的一个确定性函数,且 Y 也是 X 的一个确定性函数,那么传递的所有信息被 X 和 Y 共享:知道 X 决定 Y 的值,反之亦然。因此,在此情形互信息与 Y(或 X)单独包含的不确定度相同,称作 Y(或 X)的熵。而且,这个互信息与 X 的熵和 Y 的熵相同。(这种情形的一个非常特殊的情况是当 X 和 Y 为相同随机变量时。)
: U0 ?! A+ E  g2 r7 `/ l
. D  u  K2 U" F8 ?* W% C- U' x1 n互信息是 X 和 Y 联合分布相对于假定 X 和 Y 独立情况下的联合分布之间的内在依赖性。于是互信息以下面方式度量依赖性:I(X; Y) = 0 当且仅当 X 和 Y 为独立随机变量。从一个方向很容易看出:当 X 和 Y 独立时,p(x,y) = p(x) p(y),因此:
( ?' {, u; \% e0 v
$ S2 s4 l: u4 e3 p$ N9 l, ^; z此外,互信息是非负的(即 I(X;Y) ≥ 0; 见下文),而且是对称的(即 I(X;Y) = I(Y;X))。! c' b% t- g0 e- T

9 U2 Q8 ?+ E4 m( D2 B7 O- j' y
0 Q/ f3 z, f& a& A/ `6 q  ^互信息特征选择算法的步骤
, `4 q4 J8 z) s4 X) @, j①划分数据集
0 A& s$ M. X' ~* G②利用互信息对特征进行排序
* C% k* D$ j0 p8 |9 H1 J③选择前n个特征利用SVM进行训练 1 {, g& ~6 A; j, S- c6 p* n
④在测试集上评价特征子集计算错误率 ) Z& C6 F8 j& N5 C; K) q
代码 , V9 r! Y4 A2 c7 j& X/ n0 \
注意使用的数据集是dlbcl,大概五千多维,可以从UCI上下载,最终选择前100特征进行训练。
- N2 ^5 i- P' X" k& }' O  p0 B; J
( ?% Q8 }& y; |. y主函数代码:
6 @  _4 K6 L) W' @) b6 U1 r
1 r# T, t+ i( g" [- m% |' v9 aclear all( n3 ~/ m) ]% K- Z: K
close all
+ N* n, n" l6 }) r+ H2 q% Sclc;
8 g0 @% C) r  O+ F; p, @[X_train,Y_train,X_test,Y_test] = divide_dlbcl();
5 C6 T0 q+ b! W( L4 H9 `/ U% ]Y_train(Y_train==0)=-1;
, u+ y3 I9 l1 f6 X4 J# gY_test(Y_test==0)=-1;7 {  h8 K  S" c7 k4 a; j
% number of features3 \6 b+ w* U0 q7 H3 a7 m  L) N
numF = size(X_train,2);
2 L$ U0 r" P7 i( M) k, d2 {- O% {* R- r. {! {' D! l# Z- |
! L/ Y0 W8 t8 t6 }# o7 u6 d0 y: q

! N$ D& f% ~9 F/ Q: B6 f[ ranking , w] = mutInfFS( X_train, Y_train, numF );
6 a: {" L" s& {. kk = 100; % select the Top 2 features1 ?: Z7 v4 N, k& d# ]9 S
svmStruct = svmtrain(X_train(:,ranking(1:k)),Y_train,'showplot',true);# a7 d3 Q- q* L$ A  n
C = svmclassify(svmStruct,X_test(:,ranking(1:k)),'showplot',true);" U# h) O5 ]* r
err_rate = sum(Y_test~= C)/size(X_test,1); % mis-classification rate
* L. F; j  j+ tconMat = confusionmat(Y_test,C); % the confusion matrix
2 Q9 L+ s3 b8 R. Q' G1 s- afprintf('\nAccuracy: %.2f%%, Error-Rate: %.2f \n',100*(1-err_rate),err_rate);
6 J/ u2 Q& N4 _  I# s& a2 r7 h* c/ {# v, X8 G% K: x: \

# p9 Y- d. P! BmutInfFS.m
( o  [: l2 j# T; j5 `3 O2 d: F4 n& n5 {
function [ rank , w] = mutInfFS( X,Y,numF )
% m3 c* l7 G3 T) a( }. R/ mrank = [];' h5 J, `4 m, T$ x+ [# M7 e
for i = 1:size(X,2)6 O8 P, n4 t6 L. h" r$ S1 ]
    rank = [rank; -muteinf(X(:,i),Y) i];- O$ Y; k# Y' K( b0 H
end;
% v5 ^  o2 z. ?: prank = sortrows(rank,1);   
2 P1 p7 a3 @8 E. K* |* }w = rank(1:numF, 1);
9 ]& [, ^/ d1 B5 q; F" W) ^rank = rank(1:numF, 2);: O/ Q  L( Z8 w( s0 z
6 H7 }! I% H. W
end: ?1 I- r+ a  I

1 g( J  j6 ^0 l& L4 J% s
2 C! o! @4 t  P' {! Rmuteinf.m3 r7 h6 X1 c7 J, ^/ }! n$ t  d

# p2 J. S1 [2 v, S5 sfunction info = muteinf(A, Y)
  p# M' Y: c1 ]1 D- U* ?) ~n = size(A,1);%实例数量4 P5 O) e8 U/ A
Z = [A Y];%所有实例的维度值及标签  G. Q% B7 d( |2 M' L5 l! @
if(n/10 > 20)) i0 I! h; F3 z, i
    nbins = 20;
- ^5 S9 Y7 \7 ?8 F& zelse
6 [3 g9 T$ n. B- D    nbins = max(floor(n/10),10);%设置区间的个数- l" u$ m) W6 O. x
end;7 R! P2 O  n1 C% E4 s3 s/ C( B
pA = hist(A, nbins);%min(A)到max(A)划分出nbins个区间出来,求每个区间的概率
, \" o# T1 j" t7 o" PpA = pA ./ n;%除以实例数量4 i3 s. ~+ g. Z) [: |: e
( j/ d/ N0 i! ~
i = find(pA == 0);
3 N; c4 |( s' ]. S4 epA(i) = 0.00001;%不能使某一区间的概率为0
5 g  o% z8 }7 ?. C4 n. r7 P; e8 |$ v& I
od = size(Y,2);%一个维度! X( r6 ~/ _/ ~2 ^& k- q8 P
cl = od;- \$ k4 ]4 v# K8 I
%下面是求实例不同标签的的概率值,也就是频率- s* {4 E5 M9 F9 Q$ b3 V1 O
if(od == 1)
: i4 c9 _) ?, S* @; }8 z    pY = [length(find(Y==+1)) length(find(Y==-1))] / n;' o: R3 o; N) @1 M. q) U
    cl = 2;/ u. N" b; j: X' U$ D8 B
else" }8 i3 \3 O& L  g9 e
    pY = zeros(1,od);/ Y" e. a8 b, G. S) G' R# p& y
    for i=1: od
& \1 w" d- M4 J( _, _8 i9 Z        pY(i) = length(find(Y==+1));7 s6 q, S& q$ E  x' m1 M1 P) ]8 A
    end;1 ]' u, [: D) g
    pY = pY / n;/ O; R- E( y# }: \' M$ F0 {
end;
3 S* m0 `2 ?% y' c$ y) `p = zeros(cl,nbins);
8 E  e0 v. g6 s& Zrx = abs(max(A) - min(A)) / nbins;%每个区间长度/ R  i5 E2 p3 q. i$ f
for i = 1:cl0 J7 t' i! S2 d/ ~3 V
    xl = min(A);%变量的下界
- r0 J- j" w3 X- Z2 T4 G1 U$ m( k    for j = 1:nbins# n0 A& }1 b5 ]5 X7 i4 g. a1 u& ^
        if(i == 2) && (od == 1)
' S: g3 f) d3 D( b- W% M/ K& c" }            interval = (xl <= Z(:,1)) & (Z(:,2) == -1);4 R& @$ z. s' Y) v$ m9 R: ]
        else0 X2 R- A# F2 c+ e
            interval = (xl <= Z(:,1)) & (Z(:,i+1) == +1);2 R, m) M( t' z. m8 U4 Q1 S
        end;
+ c/ J1 t8 n2 D4 ]6 n        if(j < nbins)
+ q5 q3 G+ H: y2 K/ R8 r7 @            interval = interval & (Z(:,1) < xl + rx);
! W+ F' f# ~$ N  e        end;+ q, B# u, V2 R$ e
        %find(interval)
# S4 {( `9 S1 A        p(i,j) = length(find(interval));
# ]8 t: i6 U5 f) f+ p! J' c& {% q; w; E5 ~( |" F7 P7 `
        if p(i,j) == 0 % hack!
3 z- U9 `+ T* k- u( o            p(i,j) = 0.00001;) M( l* H/ h* N. H& U5 J% Y
        end
) c' l% e/ r0 p4 B& U" f7 a
2 u+ y* x2 |  p6 g7 t0 {) X        xl = xl + rx;
- ]0 C3 c4 @  `/ t" d/ V3 k    end;: J' Z' m8 D: h1 `/ p& m3 R7 P4 I# T) k
end;7 L% x. r! C. u- `  q$ D0 {, t# i
HA = -sum(pA .* log(pA));%计算当前维度的信息熵6 J, ?9 {, P' L7 w, b
HY = -sum(pY .* log(pY));%计算标签的信息熵
- `7 T2 Z  P% M( u6 L* H9 Y# \% `pA = repmat(pA,cl,1);
! y) `4 M3 p& t5 \pY = repmat(pY',1,nbins);
! V1 R* U' A# |; lp = p ./ n;
8 N0 R# [9 ?. b' n% ginfo = sum(sum(p .* log(p ./ (pA .* pY))));
: i3 Z5 I3 f. u" Q7 R- Sinfo = 2 * info ./ (HA + HY);%计算互信息7 h1 L0 k9 ^3 {  @: k  u

' C4 Q. A4 y& _+ ?8 d; `. m' R1 H' m3 ]- i/ R/ Q( @7 G. O
前100个特征的效果:) K3 d* f5 k4 o$ h) ^$ D

# c( c2 j- r: N) D; sAccuracy: 86.36%, Error-Rate: 0.144 f$ v+ j( Q. Q& A
7 s, D5 A# i( @( q9 I5 q' ]
选择前两个特征进行训练(压缩率接近100%,把上述代码中的K设为2即可)的二维图:
/ _6 q0 M' }1 q  i' I$ r1 B
& v& v. e" C- e" K) u. o$ v1 E1 _Accuracy: 75.00%, Error-Rate: 0.25
/ M) b6 C' A1 ?# r8 P( |! \" ~& X- p' b* s

( u4 ^3 }4 P8 \% `* O) j9 r8 L/ U/ C+ O

该用户从未签到

2#
发表于 2020-5-18 13:23 | 只看该作者
基于互信息的特征选择算法MATLAB实现
您需要登录后才可以回帖 登录 | 注册

本版积分规则

关闭

推荐内容上一条 /1 下一条

EDA365公众号

关于我们|手机版|EDA365电子论坛网 ( 粤ICP备18020198号-1 )

GMT+8, 2025-11-24 18:40 , Processed in 0.171875 second(s), 26 queries , Gzip On.

深圳市墨知创新科技有限公司

地址:深圳市南山区科技生态园2栋A座805 电话:19926409050

快速回复 返回顶部 返回列表