Re: Size of numerical slider value in Manipulate
- To: mathgroup at smc.vnet.net
- Subject: [mg102887] Re: [mg102860] Size of numerical slider value in Manipulate
- From: "David Park" <djmpark at comcast.net>
- Date: Tue, 1 Sep 2009 03:53:45 -0400 (EDT)
- References: <23361497.1251715457307.JavaMail.root@n11>
Make a custom dynamic with Presentations.
Needs["Presentations`Master`"]
DynamicModule[
{n = 1},
panelpage[
pagelet[
(* Label, Slider and Value *)
phrase[
Style["mylabel", 24, Bold], Spacer[5],
Slider[Dynamic[n], {1, 3}], Spacer[5],
Dynamic[Style[NumberForm[n, {4, 3}], 24]]],
(* Dynamic plot *)
Dynamic@Plot[Sin[n x], {x, -5, 5},
PlotRange -> {-1, 1}, PlotRangePadding -> .05,
Frame -> True,
AxesStyle -> GrayLevel[.75],
Method -> {"AxesInFront" -> False},
ImageSize -> 400]
](* pagelet *),
Style["Custom Dynamic", 16]
]
]
David Park
djmpark at comcast.net
http://home.comcast.net/~djmpark/
From: Porscha Louise McRobbie [mailto:pmcrobbi at umich.edu]
Hello,
How can I control the font size of the displayed value of the slider
variable "n" in the following?
Manipulate[
Plot[Sin[n x], {x, -5, 5},
PlotRange -> {-1, 1}], {{n, 1, Style["mylabel", 24, Bold]}, 1, 3,
Appearance -> "Labeled"}]
I've tried using Style, LabelStyle and Appearance -> {"Labeled",
Larger}, none of which seem to work.
Thanks in advance,
Porscha