Services & ResourcesWolfram ForumsMathGroup Archive

[Date Index] [Thread Index] [Author Index]

Re: Nesting Manipulate to Create a Variable Number of

• To: mathgroup at smc.vnet.net
• Subject: [mg132521] Re: Nesting Manipulate to Create a Variable Number of
• From: Gregory Lypny <gregory.lypny at videotron.ca>
• Date: Sat, 5 Apr 2014 01:48:14 -0400 (EDT)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com
• Delivered-to: l-mathgroup@wolfram.com
• Delivered-to: mathgroup-outx@smc.vnet.net
• Delivered-to: mathgroup-newsendx@smc.vnet.net
• References: <20140403061701.694E06A15@smc.vnet.net>

Hi Bob,

Thanks! Just what the doctor ordered. Good exercise for code study too because I can compare your use of Evaluate with the Documentation Center's use of With.

Thanks once again,

Gregory


On Thu, Apr 3, 2014, at 11:28 PM, Bob Hanlon <hanlonr357 at gmail.com> wrote:

> If I understand what you want:
>
> Manipulate[
>  Manipulate[
>   "test",
>   Evaluate[Sequence @@ Table[
>      Row[{
>        Control[Evaluate[{
>           {ToExpression[
>             "nameMenu" <>
>              StringJoin[ToString /@
>                IntegerDigits[k, 10, 2]]],
>            Subsuperscript["name", k, 1]},
>           Table[
>            Subsuperscript["name", k, j],
>            {j, 5}],
>           ControlType -> PopupMenu}]],
>        Spacer[25 - 3 Floor[Log10[k]]],
>        Control[Evaluate[{
>           {ToExpression[
>             "valueSlider" <>
>              StringJoin[ToString /@
>                IntegerDigits[k, 10, 2]]],
>            1},
>           1, 10, 1, Appearance -> "Labeled"}]]}],
>      {k, n}]]],
>  {{n, 3, "Number of control pairs"}, Range[10]}]
>
>
> Bob Hanlon
>

• References:
  • Nesting Manipulate to Create a Variable Number of Controls
    • From: Gregory Lypny <gregory.lypny@videotron.ca>