entropy.m

北邮《通信原理基于Matlab的计算机仿真》书的源码 m文件 好不容易弄来的

%产生高斯信源并计算其熵
x = 1 + randn(1,100000);  %产生N(1,1)高斯源
px = 1/sqrt(2*pi)*exp(-(x-1).^2/2);
I = -mean(log2(px))      %近似的信源熵