fwt_5scales.asv

vector to matrix function

%This function performs the fast wavelet transform in 5 scales.

[Lo_d,Hi_d]=wfilters ('db1','d');  %decomposition filters for the fwt algorithm ('gaus'?)

%a=1:1:128;

S=zeros(128,19);
S(:,19)=1:1:128;

%perform fast wavelet transform


for m=1:1:19
[cA1,cD1]=dwt (S(:,m),Lo_d,Hi_d); %first scale
W1(:,m)=cA1';

[cA2,cD2]=dwt (cA1,Lo_d,Hi_d); %first scale
W2(:,m)=cA2';

[cA3,cD3]=dwt (cA1,Lo_d,Hi_d); %first scale
W2(:,m)=cA2';
end