rle_encoding.m

来自「霍夫曼编码、算术编码和行程编码的matlab实现」· M 代码 · 共 18 行

a=input('输入二进制字符串: ');
n=2;
for k=1:length(a)-1
    if a(k)~=a(k+1)
       n=n+1;
    end
end

rle=ones(1,n);
rle(1)=a(1);
m=2;
for i=1:k
    if a(i)==a(i+1)
       rle(m)= rle(m)+1;
     else m=m+1;
    end
end
display(rle);