香農(nóng)費(fèi)諾編碼的matlab實(shí)現(xiàn)

1、信息論與編碼實(shí)驗(yàn)香農(nóng)-費(fèi)諾編碼的matlab實(shí)現(xiàn)學(xué)院：-班級：-姓名：-學(xué)號：-摘要: 用預(yù)先規(guī)定的方法將文字、數(shù)字或其他對象編成數(shù)碼，或?qū)⑿畔?、?shù)據(jù)轉(zhuǎn)換成規(guī)定的電脈沖信號。編碼在電子計算機(jī)、電視、遙控和通訊等方面廣泛使用。其中費(fèi)諾編碼有廣泛的應(yīng)用,通過本次實(shí)驗(yàn),了解編碼的具體過程,通過編程實(shí)現(xiàn)編碼,利用matlab實(shí)現(xiàn)費(fèi)諾編碼。關(guān)鍵字：信息論，費(fèi)諾編碼，matlab正文：費(fèi)諾編碼也是一種常見的信源編碼方法。信源符號以概率遞減的次序排列進(jìn)來,將排列好的信源符號劃分為兩大組,使第組的概率和近于相同,并各賦于一個二元碼符號”0”和”1”.然后,將每一大組的信源符號再分成兩組,使同一組的兩個小組的概

2、率和近于相同,并又分別賦予一個二元碼符號.依次下去,直至每一個小組只剩下一個信源符號為止.這樣,信源符號所對應(yīng)的碼符號序列則為編得的碼字.香農(nóng)-費(fèi)諾編碼的matlab實(shí)現(xiàn)編碼如下：clc;clear;A=0.4,0.3,0.1,0.09,0.07,0.04;A=fliplr(sort(A);%降序排列m,n=size(A);for i=1:n B(i,1)=A(i);%生成B的第1列end%生成B第2列的元素a=sum(B(:,1)/2;for k=1:n-1 if abs(sum(B(1:k,1)-a)=abs(sum(B(1:k+1,1)-a) break; endendfor i=1:n

3、%生成B第2列的元素 if i=k B(i,2)=0; else B(i,2)=1; endend%生成第一次編碼的結(jié)果END=B(:,2);END=sym(END);%生成第3列及以后幾列的各元素j=3;while (j=0) p=1; while(p=n) x=B(p,j-1); for q=p:n if x=-1 break; else if B(q,j-1)=x y=1; continue; else y=0; break; end end end if y=1 q=q+1; end if q=p|q-p=1 B(p,j)=-1; else if q-p=2 B(p,j)=0; END

4、(p)=char(END(p),0; B(q-1,j)=1; END(q-1)=char(END(q-1),1; else a=sum(B(p:q-1,1)/2; for k=p:q-2 if abs(sum(B(p:k,1)-a)=abs(sum(B(p:k+1,1)-a); break; end end for i=p:q-1 if i=k B(i,j)=0; END(i)=char(END(i),0; else B(i,j)=1; END(i)=char(END(i),1; end end end end p=q; end C=B(:,j); D=find(C=-1); e,f=size(D); if e=n j=0; else j=j+1; endendBAE