encode.m

来自「小波工具箱的应用基础 395 16.1 一维小波分析的应用 395 16.1」· M 代码 · 共 33 行

function cC=encode(C)
%初始变量
zeroseq=0;
zerocount=0;
j=1;
compC=[];

for m=1:length(C)
    if (C(m)==0)&(zeroseq==0)
        compC=[compC C(m)];
        j=j+1;
        zeroseq=1;
        zerocount=1;
        if m==length(C)
            compC=[compC zerocount];
        end
    elseif (C(m)==0)&(zeroseq==1)
        zerocount=zerocount+1;
        if m==length(C)
            compC=[compC zerocount];
        end
    elseif (C(m)~=0)&(zeroseq==1)
        compC=[compC zerocount C(m)];
        j=j+2;
        zeroseq=0;
        zerocount=0;
    else
        compC=[compC C(m)];
        j=j+1;
    end
end
cC=compC;