function?h=Hp（p）
%熵函數計算，輸入是概率p（標量或一維矢量）
%輸出是h與p同維度
h=zeros（1length（p））
index=find（p>0&p<1）;
P=p（index）;
h（index）?=?-P.*log（P）-（1-P）.*log（1-P）;
end

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件????????184??2019-04-08?21:28??Hp.m

?????文件???????1485??2019-04-20?12:31??R_delta.m

?????文件????????433??2019-04-08?21:29??test1.m

?????文件????????380??2019-04-17?20:09??test2.m

-----------?---------??----------?-----??----

?????????????????2482????????????????????4