|
|
EDA365欢迎您登录!
您需要 登录 才可以下载或查看,没有帐号?注册
x
在概率论和信息论中,两个随机变量的互信息(Mutual Information,简称MI)或转移信息(transinformation)是变量间相互依赖性的量度。不同于相关系数,互信息并不局限于实值随机变量,它更加一般且决定着联合分布 p(X,Y) 和分解的边缘分布的乘积 p(X)p(Y) 的相似程度。互信息(Mutual Information)是度量两个事件集合之间的相关性(mutual dependence)。互信息最常用的单位是bit。
( z: q* |& [% D7 {' M2 T9 i0 ?, H/ z
. z# J' Q# e* r2 Y R4 m
互信息的定义 3 i! C0 Y/ i$ D, Y5 B5 `' T9 l& L
正式地,两个离散随机变量 X 和 Y 的互信息可以定义为:+ Y3 z/ N3 s" B* \
# o, i+ Y7 W! E+ p6 l4 f' S8 W+ ?其中 p(x,y) 是 X 和 Y 的联合概率分布函数,而p(x)和p(y)分别是 X 和 Y 的边缘概率分布函数。
6 J3 o! d& h# n6 o
' f1 ]7 `, O& _. l$ ?& f2 R! b
2 e& m/ q, W5 j8 {4 K' t: z
i3 h# w" T0 \+ M3 `3 F6 ]2 x. \) ^
$ K6 \2 R% W- v5 k在连续随机变量的情形下,求和被替换成了二重定积分: 8 f+ X' j& }" j% d
/ L: a7 s9 s) }
* A% y: J7 [% V1 e, K
% T; W* M7 U$ t5 `
0 h" g3 l6 y: e其中 p(x,y) 当前是 X 和 Y 的联合概率密度函数,而p(x)和p(y)分别是 X 和 Y 的边缘概率密度函数。5 ~; j* [0 s9 ~
# W2 w9 L' B& H/ r S
* c5 ~+ @3 _; T4 q5 I2 S互信息量I(xi;yj)在联合概率空间P(XY)中的统计平均值。 平均互信息I(X;Y)克服了互信息量I(xi;yj)的随机性,成为一个确定的量。如果对数以 2 为基底,互信息的单位是bit。# J7 x+ F" k* j' L+ z
/ @6 d: H$ ~. z6 Z/ q2 X, R, n9 t1 z# k/ P4 U
直观上,互信息度量 X 和 Y 共享的信息:它度量知道这两个变量其中一个,对另一个不确定度减少的程度。例如,如果 X 和 Y 相互独立,则知道 X 不对 Y 提供任何信息,反之亦然,所以它们的互信息为零。在另一个极端,如果 X 是 Y 的一个确定性函数,且 Y 也是 X 的一个确定性函数,那么传递的所有信息被 X 和 Y 共享:知道 X 决定 Y 的值,反之亦然。因此,在此情形互信息与 Y(或 X)单独包含的不确定度相同,称作 Y(或 X)的熵。而且,这个互信息与 X 的熵和 Y 的熵相同。(这种情形的一个非常特殊的情况是当 X 和 Y 为相同随机变量时。)
S: f, y4 D6 z6 e8 ~! _' `% |; \; |) Y! J7 g/ G4 l
! g$ R. y% _( H; G4 P
互信息是 X 和 Y 联合分布相对于假定 X 和 Y 独立情况下的联合分布之间的内在依赖性。于是互信息以下面方式度量依赖性:I(X; Y) = 0 当且仅当 X 和 Y 为独立随机变量。从一个方向很容易看出:当 X 和 Y 独立时,p(x,y) = p(x) p(y),因此: ; q7 [- K- i+ o5 X+ i1 h/ M
4 K: p5 H+ z$ a& d; W( [
1 n) L& J9 Q# z8 p9 S; Q; m
' ~6 F1 ~+ [3 m, ~7 y/ N
t( U+ U% d6 Y5 d; G: ?. F+ R5 f5 V此外,互信息是非负的(即 I(X;Y) ≥ 0; 见下文),而且是对称的(即 I(X;Y) = I(Y;X))。
. v. r3 c8 @, D6 \3 m& N/ `( o/ ~2 Z `+ q' d- {* j5 k9 C, x
; A1 c+ A' V: m7 D% G, R' [互信息特征选择算法的步骤
, l9 h# `- R# s. b①划分数据集 * ~. z1 F( h, H* c
②利用互信息对特征进行排序
( S- w# Z+ s6 W! r③选择前n个特征利用SVM进行训练 0 E9 Q \( z2 v- A
④在测试集上评价特征子集计算错误率 1 ?+ _; l6 m% y' t2 S' i0 d1 p
) _2 {- n! g9 v( n2 u8 h+ H9 ~1 }
g4 R& P8 M' _& u. t代码 9 }: Y# A5 P+ B, K; L, z! p9 }
注意使用的数据集是dlbcl,大概五千多维,可以从UCI上下载,最终选择前100特征进行训练。2 o9 T+ ?5 W& W' U3 n" R2 H
: F2 D1 _6 X; k E
2 P7 o: u: q, t: F# f$ ?主函数代码:
4 |( O& b" z. b; n0 u# ]8 L& L7 {& {/ u) \1 f. f! H# M0 U
) y( d# {- x) o# ^* w- }
- clear all
- close all
- clc;
- [X_train,Y_train,X_test,Y_test] = divide_dlbcl();
- Y_train(Y_train==0)=-1;
- Y_test(Y_test==0)=-1;
- % number of features
- numF = size(X_train,2);
- 8 E3 k8 {! g' t9 V; y! X
- . v9 N9 J. E# A! h. Q8 i) Q
" F4 E( _3 F) B' h' d" S1 u d- [ ranking , w] = mutInfFS( X_train, Y_train, numF );
- k = 100; % select the Top 2 features
- svmStruct = svmtrain(X_train(:,ranking(1:k)),Y_train,'showplot',true);
- C = svmclassify(svmStruct,X_test(:,ranking(1:k)),'showplot',true);
- err_rate = sum(Y_test~= C)/size(X_test,1); % mis-classification rate
- conMat = confusionmat(Y_test,C); % the confusion matrix
- fprintf('\nAccuracy: %.2f%%, Error-Rate: %.2f \n',100*(1-err_rate),err_rate);
/ _3 m% q7 b! H3 D* T. ]4 z& {) w
# `: ^2 M+ E% l9 y' e7 N
0 l! o( P$ B+ U0 p3 ~5 a
# F, t. M/ |) E/ j0 F) p% s% N/ OmutInfFS.m
& q0 c8 ~, P: t* W) @# q {
, J. E" ~9 P# g. F+ ^. J9 I0 |. @. C9 V! k. J$ U0 I" L3 v
- function [ rank , w] = mutInfFS( X,Y,numF )
- rank = [];
- for i = 1:size(X,2)
- rank = [rank; -muteinf(X(:,i),Y) i];
- end;
- rank = sortrows(rank,1);
- w = rank(1:numF, 1);
- rank = rank(1:numF, 2);
- . o3 W3 W0 F! K% N% b
- end! \4 z9 Q1 Q7 \2 g% X+ @# `, n
. [" k6 Q& K! r" T# y+ e
# ~8 N; V0 W/ Y1 L7 z- T2 }( Q# K# O2 V1 h8 ]) v5 j
muteinf.m V$ q& N" ]+ j% [5 I
( s7 b( K6 t$ j" P0 k/ U
4 M: o/ _7 A4 g0 Z: j$ N; ^
- function info = muteinf(A, Y)
- n = size(A,1);%实例数量
- Z = [A Y];%所有实例的维度值及标签
- if(n/10 > 20)
- nbins = 20;
- else
- nbins = max(floor(n/10),10);%设置区间的个数
- end;
- pA = hist(A, nbins);%min(A)到max(A)划分出nbins个区间出来,求每个区间的概率
- pA = pA ./ n;%除以实例数量
- 2 k3 N9 G; w6 n+ `
- i = find(pA == 0);
- pA(i) = 0.00001;%不能使某一区间的概率为0
- ; O: M' T: g1 a9 y
- od = size(Y,2);%一个维度
- cl = od;
- %下面是求实例不同标签的的概率值,也就是频率
- if(od == 1)
- pY = [length(find(Y==+1)) length(find(Y==-1))] / n;
- cl = 2;
- else
- pY = zeros(1,od);
- for i=1
d - pY(i) = length(find(Y==+1));
- end;
- pY = pY / n;
- end;
- p = zeros(cl,nbins);
- rx = abs(max(A) - min(A)) / nbins;%每个区间长度
- for i = 1:cl
- xl = min(A);%变量的下界
- for j = 1:nbins
- if(i == 2) && (od == 1)
- interval = (xl <= Z(:,1)) & (Z(:,2) == -1);
- else
- interval = (xl <= Z(:,1)) & (Z(:,i+1) == +1);
- end;
- if(j < nbins)
- interval = interval & (Z(:,1) < xl + rx);
- end;
- %find(interval)
- p(i,j) = length(find(interval));
- 6 Y/ Z& \" G# B% t7 H H+ z: a& y
- if p(i,j) == 0 % hack!
- p(i,j) = 0.00001;
- end
- 3 d/ g& d9 R/ B7 K# n
- xl = xl + rx;
- end;
- end;
- HA = -sum(pA .* log(pA));%计算当前维度的信息熵
- HY = -sum(pY .* log(pY));%计算标签的信息熵
- pA = repmat(pA,cl,1);
- pY = repmat(pY',1,nbins);
- p = p ./ n;
- info = sum(sum(p .* log(p ./ (pA .* pY))));
- info = 2 * info ./ (HA + HY);%计算互信息
* P% P+ R4 F6 m! \
8 t6 n: s$ k9 j3 p# O, Q* L4 r5 L% B/ @ ~9 ~
& f( `7 v' Y! l* K! d( E: x前100个特征的效果:- u* R7 c# B; p4 i* G; P1 h1 E: T2 H
' Y2 \9 g/ D# n3 L$ s! ~
0 R4 `2 c1 f) i6 sAccuracy: 86.36%, Error-Rate: 0.14/ t, Y2 m! {" r
; W# w$ N0 A3 t, J
+ F( y, w' {& I& u! B9 A选择前两个特征进行训练(压缩率接近100%,把上述代码中的K设为2即可)的二维图: 1 ]4 @( b, O% E- D3 L
. y$ I2 j1 i7 A0 A5 h% [; ]3 _
1 Y: y( d& U- x2 C
; Z2 M" j' H, C
) r: X; Q1 u! Q. MAccuracy: 75.00%, Error-Rate: 0.25
; k7 m& m" u& j* v+ j) S* v7 Z8 ~; ~! h/ J% f2 f N0 n( O
; Z8 O! f& ]1 x! R% y4 R! b: n( W
) s' V$ a, K& c+ d5 W- V5 V8 I: T+ x! t1 |' Q. G9 y
|
|