clear,close all,clc;
%%%%%%%%%%Haar小波基
[phi,g1,xval] = wavefun(‘haar’,20);
subplot(2,1,1);
plot(xval,g1,‘b’,‘LineWidth’,1);
xlabel(‘t’)
title(‘Haar小波基时域’);
g2=fft(g1);
g3=abs(g2);
subplot(2,1,2);
plot(g3,‘b’,‘LineWidth’,1);
xlabel(‘f’)
title(‘Haar小波基频域’)
%%%%%%%%%Daubechies
clear,close all,clc;
[phi,g1,xval] = wavefun(‘db4’,10);
subplot(2,1,1);
plot(xval,g1,‘b’,‘LineWidth’,1);
xlabel(‘t’)
title(‘Daubechies小波基时域’);
g2=fft(g1);
g3=abs(g2);
subplot(2,1,2);
plot(g3,‘b’,‘LineWidth’,1);
xlabel(‘f’)
title(‘Daubechies小波基频域’)
%%%%%%%%%%%%%Mexican Hat
clear,close all,clc;
d=-6