Требуется опция BaseStyle
(появляется в Options[Slider]
).Например,
Manipulate[
Plot[Cos[k x], {x, 0, 2 Pi}, PlotLabel -> "Cosine"],
{{k, 1, Style["x", Black, Bold, 24]}, 0, 4,
ControlType -> Slider, Appearance -> "Labeled",
ControlPlacement -> Bottom, ImageSize -> 200,
BaseStyle -> {Red, Large, Italic, FontFamily -> "Times"}}]
Глядя на это, я заметил, что вы также можете использовать почти без документов ControlType -> LabeledSlider
, просто для чего-то другого.