Entropy 有关于求取图像信息熵的matlab M 文件；虽然很简单

有关于求取图像信息熵的matlab M 文件；虽然很简单，但可以为你省去那么一点时间。 共享改变未来！

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%% 计算一副图像的信息熵 %%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% 作者：刘建华 时间：2008.6.9 %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%读入图像
%如需计算多幅图像，只需修改名称即可
img=imread（‘gs3r.jpg‘）;


%获取图像行列号
[MN]=size（img）;

%生成值为零的初始化数组。其用来统计和存储对应于每个
%灰度级的频数（概率），数组的大小根据图像的大小而定
temp=zeros（MN）;

figureimshow（img）;

%对图像的灰度值做统计，计算每个灰度级出现的次数
for m=1:M;
    for n=1:N;
        if img（mn）==0;
           i=1;
        else
           i=img（mn）;
        end
        temp（i）=temp（i）+1;
    end
end
temp=temp./（M*N）;

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%% 由熵的定义做计算信息熵 %%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

%初始化信息熵存储变量
EntropyResult=0;

for i=1:length（temp）
    if temp（i）==0;
       EntropyResult=EntropyResult;
    else
       EntropyResult=EntropyResult-temp（i）*log2（temp（

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        976  2009-06-19 11:03  Entropy\entropy.m

     文件    1058883  2007-11-19 13:56  Entropy\JPEG Specification\ITU-T.81.pdf

     文件      17183  2011-06-03 10:19  Entropy\JPEG Specification\JPEG File Interchange Format.pdf

     文件          0  2011-06-03 10:43  Entropy\求图像信息熵 matlab M文件entropy.txt

     目录          0  2011-06-03 10:44  Entropy\JPEG Specification

     目录          0  2011-06-03 10:44  Entropy

----------- ---------  ---------- -----  ----

              1077042                    6