Re: Manipulate Hints, Tips, Tricks
- To: mathgroup at smc.vnet.net
- Subject: [mg121609] Re: Manipulate Hints, Tips, Tricks
- From: "Christopher O. Young" <cy56 at comcast.net>
- Date: Thu, 22 Sep 2011 07:25:13 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- References: <g00us6$gjg$1@smc.vnet.net>
Thanks for the help. This really speeds up the learning process. Chris Young On 5/9/08 3:35 AM, in article g00us6$gjg$1 at smc.vnet.net, "Frank Iannarilli" <frankeye at cox.net> wrote: > Hi, > > Here's a compilation of beginner-intermediate tips for using > Manipulate toward its max potential - hope it helps. {I'm on WinXP, > using 6.0.2} > > Paste/evaluate the code later below to note the effects of the various > elements: > > 1) Style["Text Label", Bold]: User interface annotation labels for > section headings, etc. > 2 Tooltip[]: Note usage for text labels (Style[]) versus for control > labels. > 3) Appearance -> "Labeled": to get live readout of control > (sliderbar) setting to the right of the control. > 4) ImageSize -> Small: to play with the item's real estate > allocation in the overall layout > 5) Delimiter: Horizontal separating bar (nice window dressing) > 6) Row[]: Means of horizontal grouping of elements, e.g., a label > and some dynamically updated value. > 7) Item[]: Wrapper for elements such as Row[], permitting use of the > Alignment option (e.g., Alignment -> Center) > 8) ControlPlacement -> {...}: A rudimentary means to get "wrap- > around" layout of controls around the main plot area. Note that each > control and annotation declaration (e.g., Row, Item, Style at the > nesting level of the control declarations) counts as one item for > callout of its placement in the {...} list. Delimiters don't count. > 9) The idiom Style[Manipulate[ ...], DynamicEvaluationTimeout -> > 10000] is intended to preclude getting an $Abort in place of the > plots, due to long evaluation time (>5sec), particularly in the > initial building of the interface. > > > > Style[ > Manipulate[ > Plot[a Sin[b x + c], {x, 0, 10}, PlotRange -> {Automatic, {-10, > 10}}], > Style[Tooltip["Vertical Controls", "y-axis"], Bold], > {{a, 1, Tooltip["amplitude", "signal strength"]}, 0, 10, > Appearance -> "Labeled", ImageSize -> Small}, > Delimiter, > Style["Horizontal Controls", Bold], > {{b, 1, "frequency"}, 0, 10}, > {{c, 0, "time lag"}, -10, 10}, > Item[Row[{Style["Phase (radians): ", Blue], > Dynamic[Mod[2*Pi*c/b, 2*Pi]]}, Spacer[2]], Alignment -> > Center], > Item[Row[{Style["Value at x=1: ", Blue], Dynamic[a Sin[b 1. + c]]}, > Spacer[2]], Alignment -> Left], > ControlPlacement -> {Top, Top, Right, Right, Right, Right, Bottom} > ], > DynamicEvaluationTimeout -> 10000] >