WOLFRAM

Wolfram Language & System Documentation Center

Visualize a Wavelet Scalogram

Create a scalogram with built-in wavelet functions.

    
Compute the wavelet function based on two sine waves:
Wolfram Language code: data1 = Table[Cos[20 π x], {x, 0, 1, (1/1023)}]; cwt1 = ContinuousWaveletTransform[data1, GaborWavelet[6]]; data2 = Table[Cos[20 π x] + Cos[Sqrt[2] 50 π x], {x, 0, 1, (1/1023)}]; cwt2 = ContinuousWaveletTransform[data2, GaborWavelet[6]]; data3 = Block[{fr = 0}, Table[Sin[(fr += 0.5)x], {x, 0, 1, (1/1023)}]]; cwt3 = ContinuousWaveletTransform[data3, GaborWavelet[6]];
Wolfram Language code: Partition[Riffle[ListLinePlot[#]& /@ {data1, data2, data3}, WaveletScalogram[#, ColorFunction -> "SolarColors"]& /@ {cwt1, cwt2, cwt3}], 2]//Grid