rleencode.m

来自「这是RLE压缩MATLAB算法,可实现的.希望有帮助」· M 代码 · 共 24 行

function [zipped,info]=RLEencode(vector)
[m,n]=size(vector);
vector=uint8(vector(:));
L=length(vector);
c=vector(1);e(1,1)=c;e(1,2)=0 %e(:,1)存放灰度，e(:,2)存放行程
t1=1
for j=1:L
    if(vector(j)==c)
        e(t1,2)=double(e(t1,2))+1;
    else
        c=vector(j);
        t1=t1+1;
        e(t1,1)=c;
        e(t1,2)=1;
    end
end
zipped=e;
info.rows=m;
info.cols=n;
[m,n]=size(e);
info.ratio=m*n/(info.rows*info.cols);