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

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

[复制链接]

该用户从未签到

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

EDA365欢迎您登录!

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

x
本帖最后由 baqiao 于 2020-5-18 13:24 编辑
& N- _  @' s% P& A# \$ d" j
5 U) o, _) Z6 `在概率论和信息论中,两个随机变量的互信息(Mutual Information,简称MI)或转移信息(transinformation)是变量间相互依赖性的量度。不同于相关系数,互信息并不局限于实值随机变量,它更加一般且决定着联合分布 p(X,Y) 和分解的边缘分布的乘积 p(X)p(Y) 的相似程度。互信息(Mutual Information)是度量两个事件集合之间的相关性(mutual dependence)。互信息最常用的单位是bit。
9 v- {6 A; ]5 a! R" R* p% Q: S! g5 ]. A7 T( u, p% _$ p3 _& T$ n
互信息的定义 8 S* q1 X4 f1 M+ S9 e
正式地,两个离散随机变量 X 和 Y 的互信息可以定义为:: v" a1 i! \; \1 S% S
& O; b4 Q! ^8 z; ^+ `# ?* D% @
其中 p(x,y) 是 X 和 Y 的联合概率分布函数,而p(x)和p(y)分别是 X 和 Y 的边缘概率分布函数。 & J" q, b+ a9 ]0 o. q+ i" J( F, h
0 B, ~& w/ l. ?: d; U" I3 P  s. l' k
在连续随机变量的情形下,求和被替换成了二重定积分: + r3 C) g$ A* D4 @; i* ~- M1 q

- ^4 |* G, F  }& ^, ^其中 p(x,y) 当前是 X 和 Y 的联合概率密度函数,而p(x)和p(y)分别是 X 和 Y 的边缘概率密度函数。
8 V' ?; D) r7 N5 D- l& E6 I& w8 Z1 A, p; t' ~* d
互信息量I(xi;yj)在联合概率空间P(XY)中的统计平均值。 平均互信息I(X;Y)克服了互信息量I(xi;yj)的随机性,成为一个确定的量。如果对数以 2 为基底,互信息的单位是bit。7 m+ v; o. p2 l9 w: B! H* \
) _$ z0 {! C( @+ z* `
直观上,互信息度量 X 和 Y 共享的信息:它度量知道这两个变量其中一个,对另一个不确定度减少的程度。例如,如果 X 和 Y 相互独立,则知道 X 不对 Y 提供任何信息,反之亦然,所以它们的互信息为零。在另一个极端,如果 X 是 Y 的一个确定性函数,且 Y 也是 X 的一个确定性函数,那么传递的所有信息被 X 和 Y 共享:知道 X 决定 Y 的值,反之亦然。因此,在此情形互信息与 Y(或 X)单独包含的不确定度相同,称作 Y(或 X)的熵。而且,这个互信息与 X 的熵和 Y 的熵相同。(这种情形的一个非常特殊的情况是当 X 和 Y 为相同随机变量时。)
' T1 s/ b; O8 X. r# ^( Z7 p1 D+ N3 h; I7 I- _! q$ p' f
互信息是 X 和 Y 联合分布相对于假定 X 和 Y 独立情况下的联合分布之间的内在依赖性。于是互信息以下面方式度量依赖性:I(X; Y) = 0 当且仅当 X 和 Y 为独立随机变量。从一个方向很容易看出:当 X 和 Y 独立时,p(x,y) = p(x) p(y),因此:
% G1 C7 S& }% I, p! x& W$ D2 e7 D * S; _! j' ?0 m0 U8 ]
此外,互信息是非负的(即 I(X;Y) ≥ 0; 见下文),而且是对称的(即 I(X;Y) = I(Y;X))。
# R, _7 O0 ?0 K) }+ c% x" T- l
' g- I2 J3 M* q8 z3 s4 g- y% e& v( X( T2 m3 o! o  c
互信息特征选择算法的步骤 , {- P9 I: j7 k5 W, D
①划分数据集
9 @8 L7 T$ u# c1 ?# N②利用互信息对特征进行排序
+ x# W) p& b" e- x③选择前n个特征利用SVM进行训练
/ i: f+ v. f% L2 i2 K# P: J④在测试集上评价特征子集计算错误率
' Y! ^3 c1 w: G代码
, j6 X% I7 [3 l+ W' T8 h注意使用的数据集是dlbcl,大概五千多维,可以从UCI上下载,最终选择前100特征进行训练。3 k: t5 _3 S& |# O+ ?" u

6 v% R% M- {& V+ v主函数代码:1 p! p7 {/ I' b, y! z7 g; k6 M9 y
: }. q0 T5 y3 H! v
clear all
; _4 N1 h4 w' Y8 z9 H- J$ X9 x7 ]close all
5 }$ ~! f+ \: j4 @* |# z' G$ M4 e) Pclc;5 L% b% o* ?, h6 o
[X_train,Y_train,X_test,Y_test] = divide_dlbcl();, t; p2 Z+ i5 i0 G# }% e4 U
Y_train(Y_train==0)=-1;% _/ N3 }7 {9 s
Y_test(Y_test==0)=-1;
; {$ V: P) e7 K) F8 \' S$ Z; p. l% number of features3 h# ?$ X7 q. \, k2 v* b" P; m
numF = size(X_train,2);7 {  T* A' m( U6 Q# p9 W5 j

; ^. x: X! |: C( H4 B- v
$ u2 ?& E2 Q2 g" e: w) l& ?
5 K- \5 ~$ v6 _; g" s2 C4 k! J  X[ ranking , w] = mutInfFS( X_train, Y_train, numF );1 Q1 d: y( Z& l
k = 100; % select the Top 2 features
2 ]# u8 s- b% ~# U* _svmStruct = svmtrain(X_train(:,ranking(1:k)),Y_train,'showplot',true);9 ?1 M+ F- s: K4 A  O' |4 M
C = svmclassify(svmStruct,X_test(:,ranking(1:k)),'showplot',true);) p1 G( D6 o- H: h9 A
err_rate = sum(Y_test~= C)/size(X_test,1); % mis-classification rate
3 s% M0 q: N9 l1 GconMat = confusionmat(Y_test,C); % the confusion matrix  O5 c5 k+ _) i8 ?7 x
fprintf('\nAccuracy: %.2f%%, Error-Rate: %.2f \n',100*(1-err_rate),err_rate);
7 F9 l7 \$ J1 Q
- ?* S# q& G) H  R2 [0 w' A# I( F2 y% m  I
mutInfFS.m
$ ?/ a# U5 A' j* o& _7 S% i! @0 u) l  j4 |- E. B! n6 A9 W( o
function [ rank , w] = mutInfFS( X,Y,numF )/ @: p* I4 s2 Q6 S
rank = [];' C# g) Q& I$ w/ H; b1 v, `
for i = 1:size(X,2)
( q) Q# n. l. r6 Q  ~" ^+ d    rank = [rank; -muteinf(X(:,i),Y) i];
* f# O: q1 j9 ^) s. F% I7 E/ iend;$ y, S2 e" P, S+ l* p9 g
rank = sortrows(rank,1);    % f# {% c- e) y& f2 D9 Z/ |$ w9 n
w = rank(1:numF, 1);
$ o- @" d+ `1 B4 l/ \rank = rank(1:numF, 2);' l( k0 X5 P, n' l

8 s" u- N1 `% Q0 s8 o4 ^* Zend
0 l3 T! W: J) J$ d, U% o) G! f$ ^) {1 E
  c3 t9 W: N4 g6 d% t( {$ c5 L; k
muteinf.m
& E) {. m$ Z% V, c) L# B& `/ B. k8 r$ T* [
function info = muteinf(A, Y)3 I, ]" V% F  b; X' O7 |8 B; [
n = size(A,1);%实例数量/ r( i" k1 J7 K+ M  ]: H
Z = [A Y];%所有实例的维度值及标签; V; g+ A1 S% y/ p( G; T: F
if(n/10 > 20)+ T- h5 v; ^8 r1 d4 S% G
    nbins = 20;
( }" \0 n! V' [( O( Pelse9 v2 s, u  L5 [# q- k/ z% G$ D
    nbins = max(floor(n/10),10);%设置区间的个数
- |& ?/ l( T0 \1 w) Z+ P* }8 @+ \8 M/ \end;
( d4 c6 t% p( s- R8 |pA = hist(A, nbins);%min(A)到max(A)划分出nbins个区间出来,求每个区间的概率& e* P9 M# I! {3 [1 G# u: G
pA = pA ./ n;%除以实例数量
  `' t/ r: F8 O. R9 O$ P. B$ C' }* B  I
i = find(pA == 0);
; E. ?+ |. E9 y7 q2 p9 J3 x' v2 f& gpA(i) = 0.00001;%不能使某一区间的概率为02 j/ I7 v2 X7 e9 h2 S2 w
- _# L8 ?5 M# @8 S9 M" J
od = size(Y,2);%一个维度
5 O3 p8 V2 u0 A5 scl = od;5 x6 x9 n; G- D/ C4 z' ?
%下面是求实例不同标签的的概率值,也就是频率. @0 A; l- k  s; r( b- F  m/ Y5 @
if(od == 1)# }8 ]7 I! r( j- _3 e
    pY = [length(find(Y==+1)) length(find(Y==-1))] / n;5 s, B5 E1 y- U. k# f/ k, s- E
    cl = 2;" E9 t  a$ g; y) K7 |
else
) L/ m8 R& T4 {8 ~  |. R    pY = zeros(1,od);
0 R3 S1 \% D4 m/ o- s/ P    for i=1: od! w: E" P" f0 j, o3 l- q
        pY(i) = length(find(Y==+1));
. e- f6 `$ U( m6 P4 r! I1 q) x) t* L    end;3 N* w; m# b3 Q0 H
    pY = pY / n;% k+ N) Y8 {/ B, r" |- t4 u
end;
5 ^% L! E8 Q" |( [+ Y2 vp = zeros(cl,nbins);" P8 G+ K( M8 @; q4 \3 e
rx = abs(max(A) - min(A)) / nbins;%每个区间长度
' f+ X5 d  `4 p- W  b; pfor i = 1:cl
) A! |' t9 c6 w& w    xl = min(A);%变量的下界
- f- \/ \6 M) C% m    for j = 1:nbins
0 y' z1 `6 ^) [/ y5 ?2 f2 b9 H& j        if(i == 2) && (od == 1)
! K0 v0 |+ x1 h) `: e            interval = (xl <= Z(:,1)) & (Z(:,2) == -1);
" k: K" `! h- Q# w- m        else
# C# ^+ }9 _2 k" ?! i6 y0 z            interval = (xl <= Z(:,1)) & (Z(:,i+1) == +1);& D0 a0 v% t+ K
        end;, P  M3 J& w7 g% I+ y% a& F
        if(j < nbins)
5 E2 @/ m4 d& l4 @" t# w: I: n            interval = interval & (Z(:,1) < xl + rx);4 s% Y. e8 C! {/ a) t2 ~
        end;/ D; f/ G+ {) r: X& P
        %find(interval)
: A0 P) S: z. q  [) i7 \/ }( E( {  ]2 m        p(i,j) = length(find(interval));
/ N, a. {  F' v' _
0 U" v$ f2 u; C4 K        if p(i,j) == 0 % hack!
: x0 C2 e9 y7 A4 q* r& l/ i            p(i,j) = 0.00001;
$ v6 a3 d- s3 U2 ~, S        end
4 |9 o* k9 N8 \& @
  V3 g+ ]9 I' }" Y1 M& H8 e& _  y0 i        xl = xl + rx;6 f8 z7 g7 C6 Z; W; D
    end;
+ c* t/ ^0 e" rend;
! f% L5 p, E, `. [4 Z8 YHA = -sum(pA .* log(pA));%计算当前维度的信息熵
# \) N9 D3 f8 X/ QHY = -sum(pY .* log(pY));%计算标签的信息熵& N* A. A& C! r: B9 s7 \
pA = repmat(pA,cl,1);
6 [# o1 P7 T1 }( G' M$ PpY = repmat(pY',1,nbins);
& S5 }! U" g' V5 e% n4 Y) Rp = p ./ n;: T- ]' y/ [& P4 C6 R" Z0 g- c
info = sum(sum(p .* log(p ./ (pA .* pY))));
# Z$ Q0 U! c" d- v& x  ]info = 2 * info ./ (HA + HY);%计算互信息
) L- E( B! ^5 K6 f2 R' \2 P7 v7 t2 r& Y
8 C5 \" [& A& U5 S+ D1 Z# O! b6 G
前100个特征的效果:
+ n' G" ~0 c8 d# V9 W; T" A
4 z  P) u& X! B/ BAccuracy: 86.36%, Error-Rate: 0.14$ G6 U2 V; l- z1 p/ u; L
* ~) a1 i2 x4 k6 N
选择前两个特征进行训练(压缩率接近100%,把上述代码中的K设为2即可)的二维图: ' [0 {; |' ^) q0 R4 a

, l! b- D: D' E( I, ?' @Accuracy: 75.00%, Error-Rate: 0.25
8 n$ R8 X! t. m4 D8 f  P# h- T! O" c7 ?5 z, }% e) @
6 O8 c# i9 N) D7 O. s: y" K8 Q- b7 L

: X. x$ m3 c2 D. Q

该用户从未签到

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

本版积分规则

关闭

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

EDA365公众号

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

GMT+8, 2025-11-5 00:31 , Processed in 0.140625 second(s), 26 queries , Gzip On.

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

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

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