Hi,
Where did I go wrong?
S1 = Table[Sin[2 i], {i, 0, 50 Pi}] // N
WaveletScalogram[S1, Frame -> True, LabelStyle -> 24,
FrameTicks -> {{ticks, Automatic}, {{26, 52, 78, 104, 130},
Automatic}}, GridLines -> {{26, 52, 78, 104, 130}, None},
FrameLabel -> {"X", "Y)"}, ColorFunction -> "LightTemperatureMap",
ImageSize -> 500];