算术编解码matlab实现

1、精选优质文档-倾情为你奉上% Author: Qu guangxiang October 23, 2011%Postal address:% Room A2012, Song garden building no.2,NanHu Campus, China University of Mining and Technology,% XuZhou, Jiangsu, P.R.China, %自编程序.clcclear allclose allTip=.请按下列要求输入字符串：1、字符串长度适宜；2、可以输入的字符仅限于：a,b,c,d,e,f ；3、输入的字符一定要用英文状态下的单引号引起来,例

2、如：efbfcafdcc。;disp(%)disp(Tip)disp(%)string_s=input(请按要求输入字符串：);j,k=size(string_s);%计算字符串的长度pa=0.1;pb=0.1;pc=0.3;pd=0.1;pe=0.1;pf=0.3; %初始化概率disp(输入的字符串是：,string_s) %显示输入的字符串format long %定义数据显示精度for i=1:k %开始算数编码 if i=1 %为字符串的第一个字符编码，a1,a2分别表示个字符串区间的端点 switch 1 %用“开关语句”检测是什么字符，在做相应的编码处理 case string_

3、s(i)=a a1=0; a2=0+pa; case string_s(i)=b a1=pa; a2=pa+pb; case string_s(i)=c a1=pa+pb; a2=pa+pb+pc; case string_s(i)=d a1=pa+pb+pc; a2=pa+pb+pc+pd; case string_s(i)=e a1=pa+pb+pc+pd; a2=pa+pb+pc+pd+pe; case string_s(i)=f a1=pa+pb+pc+pd+pe; a2=1; end l=a2-a1; %计算各字符串编码区间的长度 end if (i=2)&(i=1&inum swi

4、tch 1 case ym1(i)=a bm0=(bm0-0)/pa; case ym1(i)=b bm0=(bm0-pa)/pb; case ym1(i)=c bm0=(bm0-pa-pb)/pc; case ym1(i)=d bm0=(bm0-pa-pb-pc)/pd; case ym1(i)=e bm0=(bm0-pa-pb-pc-pd)/pe; case ym1(i)=f bm0=(bm0-pa-pb-pc-pd-pe)/pf; end i=i+1; ym1(i)=YM(bm0);%调用单个字符译码子程序YM对第二个码元及以后各码元译码end%打印输出译码结果disp(%)disp(译码结果是：,ym1)disp(%)function ym=YM(A)pa=0.1;pb=0.1;pc=0.3;pd=0.1;pe=0.1;pf=0.3; %初始化概率%用“开关语句”检测编码所处的区间，以便做相应的译码处理switch 1 case 0=A&Apa ym=a; case pa=A&Apa+pb ym=b; case pa+pb=A&Apa+pb+pc ym=c; case pa+pb+pc=A&Apa+pb+pc+pd ym=d; case pa+pb+pc+pd=A&