Continuous Wavelet Families
Show the wavelet function (
) for different continuous wavelet families.
wavePlot[wave_, {min_, max_}] := Plot[WaveletPsi[wave, x], {x, min, max}, PlotRange -> All, Exclusions -> None, Filling -> {1 -> Axis}, Axes -> None, PlotLabel -> Head[wave]]wavePlot2[wave_, {min_, max_}] := Plot[{Re[WaveletPsi[wave, x]], Im[WaveletPsi[wave, x]]}, {x, min, max}, PlotRange -> All, Exclusions -> None, Filling -> {1 -> Axis, 2 -> Axis}, Axes -> None, PlotLabel -> Head[wave]];Grid[{{wavePlot[MexicanHatWavelet[], {-5, 5}], wavePlot[MorletWavelet[], {-5, 5}], wavePlot[DGaussianWavelet[3], {-5, 5}]}, {wavePlot2[GaborWavelet[4], {-3, 3}], wavePlot2[PaulWavelet[], {-2, 2}], ""}}, Frame -> All, FrameStyle -> Gray]