www.gusucode.com > wavelet 源码程序 matlab案例代码 > wavelet/VisualizeHaarWaveletDictionaryExample.m

    %% Visualize Haar Wavelet Dictionary  
% Use the output argument, |LONGS|, to visualize a dictionary. Create a Haar 
% wavelet dictionary consisting of level-2 scaling functions, and level-1 
% and level-2 wavelet functions. 
[mpdict,~,~,longs] = wmpdictionary(100,'lstcpt',{{'haar',2}});
for nn = 1:size(mpdict,2)

    if (nn <= longs{1}(1))
        plot(mpdict(:,nn),'k','linewidth',2); grid on;
    xlabel('Translation');
        title('Haar Scaling Function - Level 2');
    elseif (nn>longs{1}(1) & nn<= longs{1}(1)+longs{1}(2))
         plot(mpdict(:,nn),'r','linewidth',2); grid on;
         xlabel('Translation');
        title('Haar Wavelet - Level 2');
    else
        title('Haar Wavelet - Level 1');
        plot(mpdict(:,nn),'b','linewidth',2); grid on;
        title('Haar Wavelet - Level 1');
        xlabel('Translation');
    end
        pause(0.2);
end