信息论与编码课程设计

1、信息论与编码课程设计报告设计题目：统计信源熵、香农编码与费诺编码专业班级：XXXXXXXXXXXX姓 名：XXXXXXXXXXXX学 号：XXXXXXXXXXXX指导老师：XXXXXXXXXXXX成 绩：时间： 2015 年 3 月 31 日目录一、设计任务与要求 2二、设计思路 2三、设计流程图 5四、程序及结果 7五、心得体会 11六、参考文献 12附录 13设计任务与要求1. 统计信源熵 要求：统计任意文本文件中各字符(不区分大小写)数量，计算 字符概率，并计算信源熵。2. 香农编码 要求：任意输入消息概率，利用香农编码方法进行编码，并计算 信源熵和编码效率。3. 费诺编码 要求：任意输

2、入消息概率，利用费诺编码方法进行编码，并计算 信源熵和编码效率。二、设计思路1、统计信源熵：统计信源熵就是对一篇英文文章中的 i 种字符(包括标点符号及空格，英文字母不区分大小写)统计其出现的次数coun(t )i ，然后计算其出现的概率 p(i)，最后由信源熵计算公式：nH(x)p(xi)log p(xi )n1算出信源熵 H (x)。所以整体步骤就是先统计出文章中总的字符 数，然后统计每种字符的数目， 直到算出所有种类的字符的个数， 进而算出每种字符的概率，再由信源熵计算公式计算出信源熵。 在这里我选择用 Matlab 来计算信源熵， 因为 Matlab 中系统自带 了许多文件操作和字符串

3、操作函数， 其计算功能强大， 所以计算 信源熵很是简单。2、香农编码信源编码模型： 信源编码就是从信源符号到码符号的一种映射 f ，它把信源输出 的符号 ai 变换成码元序列 xi 。f ：ai xi ,i 1,2,., qN信源编码器Xi xi1 , xi2 ., xili码元S: s a1,., aq 信源Si a1,., aq i 1,2,., NX : x x1,., xr 码符号N 次扩展信源无失真编码器凡是能载荷一定的信息量， 且码字的平均长度最短， 可分离 的变长码的码字集合都可以称为最佳码。 为此必须将概率大的信 息符号编以短的码字， 概率小的符号编以长的码字， 使得平均码 字

4、长度最短。 能获得最佳码的编码方法主要有： 香农( Shannon)、 费诺( Fano)、哈夫曼( Huffman )编码等。香农第一定理：离散无记忆信源为Ss1s2 sqPp(s1) p(s2 ) p(sq)熵H(S),其 N次扩展为SNP12p( 1) p( 2)qp( q )熵为 H（SN）, 码符号集为 X （ x1, x2,., xr ） 。先对信源 SN进行编码，总可以找到一种编码方法，构成唯一可译码，使 S 中每个信源符号所需的平均码长满足H (S) 1 LN log r N NH (S) log r且当 N时有 liNm LNN Hlog(Sr) Hr(S)qNL是平均码长

5、L p( i) i ， ， i 1i 是 i 对应的码字长度香农编码方法：1）将信源消息符号按其出现的概率大小依次排列: p1 p2 . pn2）确定满足下列不等式整数码长 Ki 为lb(pi ) Kilb(pi) 13）为了编成唯一可译码，计算第 i 个消息的累加概率为i1Pip（ak ）k14）将累加概率 Pi 变成二进制数。5）取 Pi二进制数小数点后 K i位即为该消息符号的二进制码字3、费诺编码方法1）将信源消息符号按其出现的概率大小依次排列：p1p2 . pn（2）将依次排列的信源符号按概率值分为两大组，使两个组的 概率之和近似相同， 并对各组赋予一个二进制码元 “0”和“1（3）

6、将每一大组的信源符号再分为两组，使划分后的两个组的概率之和近似相同， 并对各组赋予一个二进制符号 “ 0”和“1(4) 如此重复，直至每个组只剩下一个信源符号为止。(5) 信源符号所对应的码字即为费诺码。三、设计流程图1、统计信源熵由信源熵计算公式 H(x)p(xi)log p(xi )计算出信源熵n12、香农编码开始输入概率矩阵将概率由大到小排列计算累加概率和概率的个数根据公式调用函数计算码长用循环程序编码并调整输出格式计算信源熵和编码效率输出信源熵、编码效率和码字结束3、费诺编码开始输入概率矩阵将概率由大到小排列计算累加概率和概率的个数在两组概率之和近似相等的条件下将概率分为两组，各赋予

7、0，1 两个码元将每一大组的的概率重复上一步操作，直到每组只剩一个概率用循环程序编码并调整输出格式计算信源熵和编码效率输出信源熵、编码效率和码字结束四、程序及结果1、统计信源熵的 Matlab 程序function h=entropy(p)clcfid=fopen( '' ,'r' ); %打开 txt 文件ex,num=fscanf(fid, '%c' ,inf) %读取二进制文件的数据，并将数据存入矩阵 str1=lower(ex) %将字符串中的大写字母转换成小写字母sort_str1=sort(str1);%按照字符的 ASCII 值对字

8、符串排序j=1;for i=1:length(sort_str1)-1%计算出字符串的种类if strcmp(sort_str1(i),sort_str1(i+1)=1%比较两个字符串是否完全相等，相等是1，否则 0j=j+1;str2(j)=sort_str1(i);endstr2(j+1)=sort_str1(i+1);endstr_num =strfind(sort_str1,str2(i);%strfind(S1,S2): 寻找 S2 是否匹配 S1，并返回 S2的位置count1(i) = length(str_num);endstr2count=count1(3:end)p=cou

9、nt./sum(count)sum(-p.*log2(p)%计算信源熵The Pressure of Graduate Studentsso fierce that many students canNow I am a post graduate student, I will graduate next year, so I start to find jobs recently, I feel so much pressure, though I have good education, I still get rejection from the companies. The pres

10、sure of graduate students are so heavy, the competition ist get the ideal jobs. They should adjust theirstrategies.The pressure of graduate students is so heavy. On the one hand, they don 't have experience, so they don ' t know how to get the job interview and miss many chances. On the othe

11、r hand, there are more and more students have high education, some have received higher education, some have studies abroad which make their resumes stand out. Those average students don ' t have advantages over the above mentioned ones.Average students need to make their resumes specially, so t

12、hey can have the chance. They can describe their characteristic to fit the job, the employers will see this and give you the chance. Students can also make their internship experience stand out, because the employers pay special attention to it.The job pressure is heavy for every graduate student, i

13、f the students take the wisestrategy, they can have more chances to get the job.程序运行结果：总共出现的字符种类： ,.abcdefghijklmnoprstuvwxy每种字符对应出现的次数：206 1611 78 10 33 42161 10 20 65 53 85 1621 58 64 1655 80 113 36 20 83 204每种字符出现的概率：信源熵： H x2、香农编码程序function c=shannon(p)% p= ;% shannon(p);p,index=sort(p);p=fliplr

14、(p);%从大到小n=length(p);pa=0; %累加概率for i=2:npa(i)=pa(i-1)+p(i-1);endk=ceil(-log2(p);%码长计算c=cell(1,n);%生成元胞数组，存码字，是cell ，跟上一行不一样for i=1:nci= '' ;tmp=pa(i);for j=1:k(i)tmp=tmp * 2;if tmp>=1tmp=tmp - 1;ci(j)='1' ;elseci(j)='0' ;endendend%p%pa%交换回原来的顺序 c=fliplr(c);c(index)=c;fpri

15、ntf( ' 信源信息熵 :n' );H=sum(-p.*log2(p) %计算信源熵 fprintf( ' 平均码长 :n' ); K=sum(p.*k) %计算平均码长 fprintf( ' 编码效率 :n' ); w=H./K %计算编码效率 fprintf( ' 码字 :n' );c 程序运行结果： p= ;shannon(p);信源信息熵 :H = 平均码长 :K = 编码效率 : w = 码字:'11110'c = '01' '00' '100' '

16、;101' '1101'3、费诺编码程序4、主程序function c=fano1(p)% p= % c=fano1(p)n=size(p,2);if n=1c=cell(1,1);c1= '' ;returnendp,index=sort(p);%按概率排序p=fliplr(p);total=sum(p); %总概率acc=0; %累积概率flag=0; %是否到达尾部的标志for i=1:n-1newacc=acc+p(i);if abs(total-2 * newacc)>=abs(total - 2*acc) flag=1;break ;e

17、ndacc=newacc;endif flagi=n;endsplit=i; %从分界点对两边的码递归做fanoc1=fano1(p(1:split-1);c2=fano1(p(split:n);c=cell(1,n);%添加前缀 0， 1for i=1:split-1ci=strcat( '0' ,c1i);endfor i = split:nci=strcat( '1' ,c2i-split+1 );end%将顺序调整回去c=fliplr(c);c(index)=c;子程序 function =fano2(c,p)for i=1:length(c)%求平均码

18、长count(i)=length(cell2mat(c(i);endfprintf( ' 信源信息熵 :n' ); H=sum(-p.*log2(p) %计算信源熵 fprintf( ' 平均码长 :n' ) K=sum(count.*p) %计算平均码长 fprintf( ' 编码效率 :n' ) w=H./K%计算编码效率 fprintf(' 码字 :n') c 程序运行结果： p= c=fano1(p) fano2(c,p) p ='1111'c = '00' '01' 

19、9;10' '110' '1110' 信源信息熵 :H = 平均码长 : K = 编码效率 : w = 码字:c = '00' '01' '10' '110' '1110' '1111'五、心得体会做这次课程设计前前后后花了三天时间，之前并没有用心 想，只是看了看网上的资料，看人家都是用什么方法解决的。我 看的有用 C（包括 C+和 C#）语言的，有用 Matlab 的，还有用 别的什么软件的。由于我对 Matlab 编程还比较熟悉一点，最后 我还是选择用 M

20、atlab 来做。一开始编程，我甚至连一些常用的 Matlab 函数都忘了，没什么想法后我在网上看了一些人用 Matlab 编的程序，拿来仔细研究后也慢慢着编出了自己的程序。 在编程过程中， 遇到了各种问题问题， 有时由于一个小问题不通， 我要反复琢磨半天， 最后发现是在一个小地方上出错了， 真是备 受煎熬， 但这也是编程的乐趣所在， 在这个过程中自己也学到了 许多编程知识和技巧。在编程过程中，我体会到了 Matlab 功能的强大，我需要好 好学习一下，这对我以后在信号处理与仿真计算上有很大帮助。通过这次课程设计， 我对信息论与编码技术中的一些基础知 识，如信源熵、通信系统模型、信道与信源编码

21、等知识又重新学 习了一下， 感觉虽是学过的知识， 但隔一段时间不看合上书自己 竟然什么也想不起来。 学过的知识， 觉得自己早就已经理解了的， 在实际用来解决问题时又是无从下手， 需多看人家的例子， 在此 基础上才能用来解决自己的问题。 我之所以自己一组， 是想真学 到点东西，这过程中很累人， 但这是因为自己当初没有提早准备， 还有就是自己知识也学的不扎实造成的， 于是感悟到做什么事情都要有计划地提早准备，不然会坐失良机，最后只能悔不当初。六、 参考文献1 曹雪虹，张宗橙 . 信息论与编码(第二版) . 北京：清华大学 出版社，2 王薇,姚鑫锋.从零开始学 MATLAB .北京： 电子工业出版

22、社，附录1、统计信源熵的 Matlab 程序function h=entropy(p)clcfid=fopen( '' ,'r' ); %打开 txt 文件ex,num=fscanf(fid, '%c' ,inf) %读取二进制文件的数据，并将数据存入矩阵str1=lower(ex) %将字符串中的大写字母转换成小写字母sort_str1=sort(str1);%按照字符的 ASCII 值对字符串排序j=1;for i=1:length(sort_str1)-1%计算出字符串的种类if strcmp(sort_str1(i),sort_str1(

23、i+1)=1%比较两个字符串是否完全相等，相等是1，否则 0j=j+1;str2(j)=sort_str1(i);endstr2(j+1)=sort_str1(i+1);endstr_num =strfind(sort_str1,str2(i); %strfind(S1,S2): 寻找 S2 是否匹配 S1，并返回 S2 的位置count1(i) = length(str_num);endstr2count=count1(3:end)p=count./sum(count)sum(-p.*log2(p) %计算信源熵2、香农编码程序function c=shannon(p)% p= ;% sha

24、nnon(p);p,index=sort(p);p=fliplr(p);%从大到小n=length(p);pa=0; %累加概率for i=2:npa(i)=pa(i-1)+p(i-1);endk=ceil(-log2(p);%码长计算c=cell(1,n);%生成元胞数组，存码字，是cell ，跟上一行不一样for i=1:nci= '' ;tmp=pa(i);for j=1:k(i)tmp=tmp * 2;if tmp>=1tmp=tmp - 1;ci(j)='1' ;elseci(j)='0' ;endendend%p%pa%交换回原来的顺序 c=fliplr(c);c(index)=c;fprintf( ' 信源信息熵 :n' );H=sum(-p.*log2(p) %计算信源熵 fprintf( ' 平均码长 :n' ); K=sum(p.*k) %计算平均码长 fprintf( ' 编码效率 :n' ); w=H./K %计算编码效率 fprintf( ' 码字 :n&#