Новое в системе Wolfram
Mathematica
8: Новые и усовершенствованные функции визуализации информации и научных данных
◄
предыдущая
|
следующая
►
Графика и визуализация
Визуализация вейвлета с помощью шкалограмм
Построение вейвлет шкалограммы векторных коэффициентов дискретных и непрерывных вейвлет-преобразований данных.
In[1]:=
X
opts = {ImageSize -> 550, Frame -> True, ImagePadding -> {{30, 3}, {15, 3}}};
In[2]:=
X
data = Table[Sign[Cos[x + Sin[x^2]]], {x, -6, 6, 0.025}]; cwt = ContinuousWaveletTransform[data];
In[3]:=
X
Column[{WaveletScalogram[cwt, ColorFunction -> "SunsetColors", opts], ListLinePlot[data, PlotStyle -> Directive[Thick, Darker@Purple], AspectRatio -> 1/4, opts]}]
Out[3]=