《信息理论编码之平均互信息量计算函数程序--武汉理工大学》由会员分享,可在线阅读,更多相关《信息理论编码之平均互信息量计算函数程序--武汉理工大学(1页珍藏版)》请在金锄头文库上搜索。
function r = InterInfor(x, p, q)Pa = x,1-x; Pa_b = p, 1-p; q, 1-q; Pb = Pa * Pa_b; Pab = zeros(2, 2);for i = 1:2for j = 1:2Pab(i,j) = Pa_b(i,j) * Pa(i);end endr = 0; for i = 1:2for j = 1:2r = r + Pab(i, j) * log2(Pab(i, j) / (Pa(i) * Pb(j);end end