Entropy.m
上传用户:loeagle
上传日期:2013-03-02
资源大小:1236k
文件大小:0k
源码类别:

通讯编程文档

开发平台:

Matlab

  1. function h=entropy(p)
  2. % H=ENTROPY(P) returns the entropy function of 
  3. % the probability vector p.
  4. if length(find(p<0))~=0,
  5.   error('Not a prob. vector, negative component(s)')
  6. end
  7. if abs(sum(p)-1)>10e-10,
  8.   error('Not a prob. vector, components do not add up to 1')
  9. end
  10. h=sum(-p.*log2(p));