步驟 1

snd = ExampleData[{"Sound", "Apollo11ReturnSafely"}]

輸出

ExampleData[{Sound, Apollo11ReturnSafely}]

步驟 2

cwd = ContinuousWaveletTransform[snd, GaborWavelet[6], {Automatic, 12}]

輸出

ContinuousWaveletTransform[ExampleData[{Sound, Apollo11ReturnSafely}], GaborWavelet[6], {Automatic, 12}]

步驟 3

sty = Directive[14, FontFamily -> "Helvetica"];

沒有輸出——這個步驟是在為下一步做準備。

步驟 4

WaveletScalogram[cwd, {3 | 4 | 5 | 6 | 7, _}, ImageSize -> 570, Ticks -> {Automatic, {#, Superscript[2, #]}& /@ Range[7]}, TicksStyle -> sty, AxesLabel -> {Style["Time", sty], Style["Scale", sty]}, ColorFunction -> ColorData["SiennaTones"]]

輸出

WaveletScalogram[ContinuousWaveletTransform[ExampleData[{Sound, Apollo11ReturnSafely}], GaborWavelet[6], {Automatic, 12}], {3 | 4 | 5 | 6 | 7, _}, ImageSize -> 570, Ticks -> {Automatic, {{1, Superscript[2, 1]}, {2, Superscript[2, 2]}, {3, Superscript[2, 3]}, {4, Superscript[2, 4]}, {5, Superscript[2, 5]}, {6, Superscript[2, 6]}, {7, Superscript[2, 7]}}}, TicksStyle -> Directive[14, FontFamily -> Helvetica], AxesLabel -> {Time, Scale}, ColorFunction -> ColorDataFunction[SiennaTones, Gradients, {0, 1}, Blend["SiennaTones", #1] & ]]

在 Qurak 上執行所有操作範例

使用到的函式

ColorData ContinuousWaveletTransform Directive ExampleData GaborWavelet Range Style Superscript WaveletScalogram

Directly transform sound

使用到的函式

相關的操作範例