Dear All,
Please can you help !
Probably a simple question, but why is tooltip not working in the Manipulate code? See also attached file 'with' and without 'Tooltip'.
Manipulate[Tooltip[
L = Length@datafreqt];
mm = MovingAverage[datafreqt[[ Range[a, b] ]], m];
If[L - 1 > a >= b, b = a + 1];
If[a === L, a = L - 1; b = L];
If[m > b - a, m = b - a];
Pane[
Graphics[
{Thin, GrayLevel[.5], Line@Transpose[{Range@L, datafreqt}]
, Thick
, Red
, Line@Transpose[
{Range[a, b, (b - a)/(Length[mm] - 1)],
mm}]}
, PlotLabel -> Style["Test with TOOLTIP", "Title", 12]
, BaseStyle -> {FontFamily -> "Arial", FontWeight -> "Bold",
FontSize -> 11}
, Frame -> True
, FrameLabel -> {"Test [%]", "Test [n]"}
, GridLines -> Automatic
, GridLinesStyle -> Directive[Black, Dotted]
, PlotRange -> {{0, 101}, {0, 200}}
, AspectRatio -> .5
, Axes -> True
, Ticks -> {None, Automatic}]
, ImageSize -> 350]
, {{m, 1, "m\[Hyphen]day moving average"}, 1, Max[b - a, 1], 1,
Appearance -> "Labeled"}
, "time span:"
, {{a, Floor[.25 L], "lower limit"}, 1, L, 1, Appearance -> "Labeled"}
, {{b, Floor[.75 L], "upper limit"}, 1, L, 1, Appearance -> "Labeled"}
, SaveDefinitions -> True
, TrackedSymbols -> True
]
Attachments:
