untitled1.asv

用于小波变换,调试过很好.可以求出任意多个小波系数.

load A0122.TXT;s=A0122; 
    A1=zeros(length(s));
    D1=zeros(length(s));
    D2=zeros(length(s));
    D3=zeros(length(s));
    D4=zeros(length(s));
    D5=zeros(length(s));
   [A1,D1,D2,D3,D4,D5] =xiaobo( s,1 );