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

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

[复制链接]

该用户从未签到

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

EDA365欢迎您登录!

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

x
本帖最后由 baqiao 于 2020-5-18 13:24 编辑
; I- }! g: x1 s" B( O: m8 ~; w5 j6 R8 |' Z, U
在概率论和信息论中,两个随机变量的互信息(Mutual Information,简称MI)或转移信息(transinformation)是变量间相互依赖性的量度。不同于相关系数,互信息并不局限于实值随机变量,它更加一般且决定着联合分布 p(X,Y) 和分解的边缘分布的乘积 p(X)p(Y) 的相似程度。互信息(Mutual Information)是度量两个事件集合之间的相关性(mutual dependence)。互信息最常用的单位是bit。
% ]- F' |) f# j" x; s5 `  K3 J+ x2 g) m7 r1 p
互信息的定义 9 y) ?" I' o4 a; ]0 B$ l. W, K2 V
正式地,两个离散随机变量 X 和 Y 的互信息可以定义为:
3 r4 R% I4 K' t4 y7 Z5 y$ Z& b. V( m. J6 a9 n( \5 B2 T
其中 p(x,y) 是 X 和 Y 的联合概率分布函数,而p(x)和p(y)分别是 X 和 Y 的边缘概率分布函数。 0 j% ^: s. ^' {. D6 }4 G
* T; v( ]0 Q& ~
在连续随机变量的情形下,求和被替换成了二重定积分: 5 T! i  u" _% \" n! f& `

. m$ `8 T: C/ }8 y! G" W& S/ }# X其中 p(x,y) 当前是 X 和 Y 的联合概率密度函数,而p(x)和p(y)分别是 X 和 Y 的边缘概率密度函数。- p( e$ `4 Q# O5 G! v, I7 v

$ ^; N' @& ^4 q& j3 @互信息量I(xi;yj)在联合概率空间P(XY)中的统计平均值。 平均互信息I(X;Y)克服了互信息量I(xi;yj)的随机性,成为一个确定的量。如果对数以 2 为基底,互信息的单位是bit。" T4 R: ^4 G1 `6 d. ?" }6 Z

, x; Y0 x& g4 D6 O直观上,互信息度量 X 和 Y 共享的信息:它度量知道这两个变量其中一个,对另一个不确定度减少的程度。例如,如果 X 和 Y 相互独立,则知道 X 不对 Y 提供任何信息,反之亦然,所以它们的互信息为零。在另一个极端,如果 X 是 Y 的一个确定性函数,且 Y 也是 X 的一个确定性函数,那么传递的所有信息被 X 和 Y 共享:知道 X 决定 Y 的值,反之亦然。因此,在此情形互信息与 Y(或 X)单独包含的不确定度相同,称作 Y(或 X)的熵。而且,这个互信息与 X 的熵和 Y 的熵相同。(这种情形的一个非常特殊的情况是当 X 和 Y 为相同随机变量时。)
& L$ u( h0 X! B* W( ?, N' P4 j1 X2 r# c
互信息是 X 和 Y 联合分布相对于假定 X 和 Y 独立情况下的联合分布之间的内在依赖性。于是互信息以下面方式度量依赖性:I(X; Y) = 0 当且仅当 X 和 Y 为独立随机变量。从一个方向很容易看出:当 X 和 Y 独立时,p(x,y) = p(x) p(y),因此: 7 Y% _- T( }+ p" C. p$ P

  Y/ k. [6 O' ]( [5 p% {/ Q此外,互信息是非负的(即 I(X;Y) ≥ 0; 见下文),而且是对称的(即 I(X;Y) = I(Y;X))。: @9 G. L$ c8 |2 r2 ^$ M
) `/ B2 _0 S  T: A/ v
/ p, `, l4 Z7 N+ f$ e
互信息特征选择算法的步骤
; `( f: G5 p7 X/ t0 D+ ^) q①划分数据集
  {+ y# y# t' S; ^. K6 c②利用互信息对特征进行排序
3 E  N7 h9 D$ W# \' w2 y③选择前n个特征利用SVM进行训练 ; W0 L- V, ]+ ?" o
④在测试集上评价特征子集计算错误率
8 z- P" O* g( z代码 0 k. n. P/ y% v
注意使用的数据集是dlbcl,大概五千多维,可以从UCI上下载,最终选择前100特征进行训练。8 p/ a" T4 F+ j6 j8 _6 a9 G
, W& B7 y5 O' d2 y9 s! z
主函数代码:
% p" s# b2 s+ q6 I8 g+ ]' E. j0 _9 D9 \5 X. k! F6 r& ?2 i/ p
clear all
- b2 h6 j) d& N; j7 I/ bclose all
. [! P4 ?8 q, sclc;! j1 C( N4 e1 i0 n& v& {/ E
[X_train,Y_train,X_test,Y_test] = divide_dlbcl();- L; d' M% z# Q, J- y1 C
Y_train(Y_train==0)=-1;  t; G! b7 b. m1 D$ K
Y_test(Y_test==0)=-1;  y' C+ N8 F4 j
% number of features
9 d/ u0 g% Q% _8 v* K7 InumF = size(X_train,2);
2 K& I1 U4 m9 J7 k$ ^' a
2 I" {( O5 c+ Y- N# ?6 {4 }4 z+ V1 x2 O8 u5 `; o4 p2 V* z6 {
2 Q0 V, ^4 v6 U0 d) f
[ ranking , w] = mutInfFS( X_train, Y_train, numF );. @; _: e$ w1 t5 c; h
k = 100; % select the Top 2 features
5 Z7 g- v) i( GsvmStruct = svmtrain(X_train(:,ranking(1:k)),Y_train,'showplot',true);
$ G3 H! k) r: n8 Y+ ~0 [C = svmclassify(svmStruct,X_test(:,ranking(1:k)),'showplot',true);
1 ^% }. X8 P) Z. I" D2 |err_rate = sum(Y_test~= C)/size(X_test,1); % mis-classification rate
9 x( C( G- ]9 t* I# p8 `# K6 nconMat = confusionmat(Y_test,C); % the confusion matrix5 Y2 V4 t9 V% S) T9 ]
fprintf('\nAccuracy: %.2f%%, Error-Rate: %.2f \n',100*(1-err_rate),err_rate);  m1 m$ k/ s" v1 j. J" u

8 O4 Z* C* Y3 k8 x$ f: h3 L  s- x4 J5 o: ^
mutInfFS.m% o/ \# t7 ?* j# }0 E* u

- J  E3 E1 N, N1 mfunction [ rank , w] = mutInfFS( X,Y,numF )
: ]5 q4 [  s4 F( ^  h9 qrank = [];0 ~# j1 m) U3 b8 L; s) f; w1 K
for i = 1:size(X,2)1 s( M/ x& Q( _  U0 Z
    rank = [rank; -muteinf(X(:,i),Y) i];
* U: ]: O2 u' V* [' z- Nend;
5 r' {# @% z3 Y0 ^rank = sortrows(rank,1);   
! s9 q, D5 _6 i4 b0 Uw = rank(1:numF, 1);4 p6 ?' N: Z! A2 \3 ]( z
rank = rank(1:numF, 2);1 }: ], Y( K# n9 Q$ }
( b1 @$ v& {( a" X* Y; v3 x
end0 a/ m- E: I- X& K6 r
3 a" a+ e+ A) Q% ?: b! _6 l) [# r
( X- b3 W' r6 |1 U
muteinf.m4 P. T/ L: W1 J. `. Q' P
: ]7 |, H% g# w4 g9 x6 _% d# u
function info = muteinf(A, Y)& v$ f5 R4 \  G, u% Z( }5 n- x
n = size(A,1);%实例数量
1 v3 Z* T' ]9 C; x' jZ = [A Y];%所有实例的维度值及标签
* g: t. A, w* ]/ f, ~. Sif(n/10 > 20)
, G: I* C- Y3 O6 K* T7 _  K# v3 M' o    nbins = 20;: c& V& u4 ~6 g% |
else
2 A) g3 v: V0 l' \# N' ]    nbins = max(floor(n/10),10);%设置区间的个数
! j0 R% I# p. e5 _, A4 u* _end;- p% Q& @" d! O1 [
pA = hist(A, nbins);%min(A)到max(A)划分出nbins个区间出来,求每个区间的概率
9 S6 w1 l/ N& z" M8 v4 Q% H3 mpA = pA ./ n;%除以实例数量6 T# ^3 j! H6 m) ~) o( k/ s

' H1 H2 B4 W. a) xi = find(pA == 0);
9 X4 |7 N7 m. i, ^: k; c8 HpA(i) = 0.00001;%不能使某一区间的概率为0
; w! t6 S0 M- V6 {1 J- z' x; l* R/ Y& k0 |6 y
od = size(Y,2);%一个维度
0 L9 R+ Q5 M& d  Q+ I7 ^: Ecl = od;
, j' R  h" Q0 D* @%下面是求实例不同标签的的概率值,也就是频率7 n2 C5 b' s' U) \! G5 m
if(od == 1)
- l2 l: m3 j+ _    pY = [length(find(Y==+1)) length(find(Y==-1))] / n;: ^  O% ?  y# }9 ]
    cl = 2;" b' T2 K1 l4 w8 s/ d
else
) p( j  W0 R/ n# s9 i% q    pY = zeros(1,od);7 O  M* d& F; j; a4 @
    for i=1: od
" v* s$ ~: E) ?. h1 L; U        pY(i) = length(find(Y==+1));
4 ~; l4 f0 K" \/ \% s6 P    end;
5 x' ^4 C: ^' O    pY = pY / n;- D5 P7 q/ {$ x  @, ?0 |5 O
end;7 H6 U- n0 O; N& d5 E
p = zeros(cl,nbins);
1 m4 P4 f0 X& K" O) {+ q* Erx = abs(max(A) - min(A)) / nbins;%每个区间长度# j' t0 b* X/ }, y! N) W& W
for i = 1:cl) r+ Z, n9 B1 S% ]; `
    xl = min(A);%变量的下界, J2 X  @% o( |. w) ?- J! k2 u
    for j = 1:nbins
3 j" E( s4 K2 x6 r. D) e        if(i == 2) && (od == 1)- M/ x9 k+ {" H+ H! h4 i
            interval = (xl <= Z(:,1)) & (Z(:,2) == -1);
" R. h  {. ~7 l; a        else
9 t: T4 G  S' f# Z3 ?            interval = (xl <= Z(:,1)) & (Z(:,i+1) == +1);2 L- s+ v" ^1 L. W* Z
        end;
& U: C5 J7 ?- e0 g        if(j < nbins)! X5 t) q6 i+ e  q/ T
            interval = interval & (Z(:,1) < xl + rx);
* {1 O0 b  J, h+ N! p7 \        end;' _- ?" u/ r8 z
        %find(interval)1 o: \) m! ]# |
        p(i,j) = length(find(interval));/ |4 N0 }- [( ^( K; b3 D! K
9 u& b# G8 K4 N& d! Y' A& O2 [& k
        if p(i,j) == 0 % hack!9 U; D  C$ j$ X  R% a; z
            p(i,j) = 0.00001;4 s6 Z. |6 n  o4 Z
        end
, v1 v' |( o" h( b/ E
& _" u3 p: j: H% y. P* F/ V4 Z3 r        xl = xl + rx;
1 {+ _2 Z' |* E9 z7 V$ Z' {    end;
  V8 y- {9 T; d, }$ jend;( v' g5 l2 a4 k: ^
HA = -sum(pA .* log(pA));%计算当前维度的信息熵" ^" W# ^8 w+ C0 a2 `3 G1 @
HY = -sum(pY .* log(pY));%计算标签的信息熵5 {. i7 K# @  x
pA = repmat(pA,cl,1);
& E8 o7 Q5 ^4 ?0 _' l9 ~pY = repmat(pY',1,nbins);
7 C( K6 u2 i, w" X; i" vp = p ./ n;
  r) Q& E' v0 B; \: g  y- W7 finfo = sum(sum(p .* log(p ./ (pA .* pY))));. t' {. B% I" C1 B. ~$ N2 L; M
info = 2 * info ./ (HA + HY);%计算互信息! V% w/ |( i9 I. M

1 F- x* M; l# c! C* b+ ]% T* ]! P8 P1 w
前100个特征的效果:3 _- v  ~! y5 ^, y+ p

$ e+ s, N7 v- s0 i( Q3 M7 uAccuracy: 86.36%, Error-Rate: 0.140 q- Q; U/ ~9 U% f$ C2 ^% |# Q/ l

% `# Q5 q! K. m8 a3 y) |( V选择前两个特征进行训练(压缩率接近100%,把上述代码中的K设为2即可)的二维图:
2 T5 K2 M5 q# i$ O2 u
/ a8 a' Y" r; H; O# BAccuracy: 75.00%, Error-Rate: 0.25
" k9 Q, @# T$ o4 m( U$ G. a9 s2 m9 v" z
( h: O+ q6 K% L8 a$ M3 f
: w: |% A; N0 G0 i0 C- W4 j4 k9 J" A, I+ u

该用户从未签到

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

本版积分规则

关闭

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

EDA365公众号

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

GMT+8, 2025-11-24 14:39 , Processed in 0.171875 second(s), 27 queries , Gzip On.

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

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

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