中南大学信息论编码.docx

文档介绍：中南大学
信息论编码实验报告
题 目 信息论编码
学生姓名
指导教师
学 院
学 号
专业班级
完成时间
实验一 关于信源熵的实验
一、实验目的
掌握离散信源熵的原理和计算方法。
2. 熟悉 mat= '' ;
imfinfo(filename) iiii
imgRgb = imread(filename); iiii imshow(imgRgb); jjjj
A = rgb2gray(imgRgb); jjjj
figure jj
imshow(A); jjjj
imwrite(A, '');
[M,N]=size(A); p=zeros(256,1);
for m=1:M;
for n=1:N;
if A(m,n)==0;
i=1;
else
i=A(m,n);
end
p(i)=p(i)+1;
end
end
p=p./(M*N)
result=0;
for i=1:length(p)
if p(i)==0; result=result;
else
result=result-p(i)*log2(p(i)); end
end
result
原图片为：
转化为灰度图：
统计结果为
p =
0
0
0
0
0
0
0
0
0
0
0
0