Search All of the Math Forum:

Views expressed in these public forums are not endorsed by NCTM or The Math Forum.

Topic: Setting parameters via Manipulate?
Replies: 5   Last Post: Jan 31, 2013 8:46 PM

 Messages: [ Previous | Next ]
 Peter Čendula Posts: 6 Registered: 12/19/12
Re: Setting parameters via Manipulate?
Posted: Jan 31, 2013 8:46 PM

Thanks Bob, this is a solution using nested two Manipulate constructs. When I implemented it in my more complicated case, the nesting of Manipulate make the UI unresponsive.

Do you have another approach in mind with just single Manipulate?

Peter

On Wednesday, January 30, 2013 10:25:29 AM UTC+1, Bob Hanlon wrote:
> If I understand what you want, this is one approach:
>
>
>
> initialSettings = {
>
> {a -> a1, b -> b1, c -> c1, d -> d1},
>
> {a -> a2, b -> b2, c -> c2, d -> d2},
>
> {a -> a3, b -> b3, c -> c3, d -> d3},
>
> {a -> a4, b -> b4, c -> c4, d -> d4},
>
> {a -> a5, b -> b5, c -> c5, d -> d5}};
>
>
>
> m = Length[initialSettings];
>
>
>
> Manipulate[
>
> is = {a, b, c, d} /. initialSettings[[parameterSet]];
>
> Manipulate[
>
> Column[{
>
> StringForm[
>
> "a = `1`, b = `2`, c = `3`, d = `4`",
>
> a, b, c, d],
>
> "\n",
>
> f[a, b, c, d]}],
>
> Row[{
>
> Control[{{a, is[[1]], "Set a"},
>
> initialSettings[[All, 1, -1]],
>
>
> Spacer[10],
>
> Control[{{b, is[[2]], "Set b"},
>
> initialSettings[[All, 2, -1]],
>
>
> Spacer[10],
>
> Control[{{c, is[[3]], "Set c"},
>
> initialSettings[[All, 3, -1]],
>
>
> Spacer[10],
>
> Control[{{d, is[[4]], "Set d"},
>
> initialSettings[[All, 4, -1]],
>
>
> {{parameterSet, 1, "Select\ninitial values"},
>
>
>
>
>
>
>
> Bob Hanlon
>
>
>
>
>
> On Tue, Jan 29, 2013 at 2:42 AM, Peter =C4=8Cendula wrote:
>

> > Thanks Bob, this show possible solution when "fixedSettings" influence ONLY parameters a,b,c,d and NOT parameters e,g. What I'm interested is how to set also initial values of a,b,c,d through ParameterSet, so something like|(which yields Part::pspec message):
>
> >
>
> >
>
> > {{a, a /. fixedSettings[[ParameterSet]], "set a"},
>
> > Thread[Range[5] -> {a1, a2, a3, a4, a5}], ControlType -> PopupMenu}
>
> >
>
> > Also when I change ParameterSet through PopupMenu, value of "a" should be set appropriately.
>
> >
>
>
> > Peter
>
> > On Saturday, January 26, 2013 10:58:42 PM UTC+1, Bob Hanlon wrote:
>
> >> fixedSettings = {
>
> >>
>
> >> {a -> a1, b -> b1, c -> c1, d -> d1},
>
> >>
>
> >> {a -> a2, b -> b2, c -> c2, d -> d2},
>
> >>
>
> >> {a -> a3, b -> b3, c -> c3, d -> d3},
>
> >>
>
> >> {a -> a4, b -> b4, c -> c4, d -> d4},
>
> >>
>
> >> {a -> a5, b -> b5, c -> c5, d -> d5}};
>
> >>
>
> >>
>
> >>
>
> >> Manipulate[
>
> >>
>
> >> Column[{
>
> >>
>
> >> StringForm[
>
> >>
>
> >> "a = `1`, b = `2`, c = `3`,
>
> >>
>
> >> d = `4`, e = `5`, g = `6`",
>
> >>
>
> >> a, b, c, d, e, g],
>
> >>
>
> >> "\n",
>
> >>
>
> >> f[a, b, c, d, e, g]
>
> >>
>
> >> }] /.
>
> >>
>
> >> fixedSettings[[ParameterSet]],
>
> >>
>
> >> Control[
>
> >>
>
> >> {{ParameterSet, 1, "Select\nParameter Set"},
>
> >>
>
>
> >>
>
>
> >>
>
> >> Control[
>
> >>
>
> >> {{e, Pi/2, "Select e"}, Range[-Pi, Pi, Pi/4],
>
> >>
>
>
> >>
>
> >> {{g, 0, "Set g"}, -5, 5, 1,
>
> >>
>
> >> Appearance -> "Labeled"}]
>
> >>
>
> >>
>
> >>
>
> >>
>
> >>
>
> >> Bob Hanlon
>
> >>
>
> >>
>
> >>
>
> >>
>
> >>
>
> >> On Sat, Jan 26, 2013 at 1:41 AM, Peter =C4=8Cendula wrote:
>
> >>
>
> >> > Hi Tamas, I have exactly the same problem. Did you come to solution =
in the meantime?
>
> >>
>
> >> >
>
> >>
>
> >> > Thanks
>
> >>
>
> >> > Peter
>
> >>
>
> >> >
>
> >>
>
> >> > On Thursday, October 6, 2011 10:27:47 AM UTC+2, Lengyel Tamas wrote:
>
> >>
>
> >> >> Dear Community,
>
> >>
>
> >> >>
>
> >>
>
> >> >>
>
> >>
>
> >> >>
>
> >>
>
> >> >> I am facing a rather hard to learn problem in Mathematica: setting
>
> >>
>
> >> >>
>
> >>
>
> >> >> multiple parameters simultaneously.
>
> >>
>
> >> >>
>
> >>
>
> >> >>
>
> >>
>
> >> >>
>
> >>
>
> >> >> The basic problem is as follows: I have a set of parameters that de=
fine a
>
> >>
>
> >> >>
>
> >>
>
> >> >> physical element (in my case an optical fiber). There are some stan=
dard
>
> >>
>
> >> >>
>
> >>
>
> >> >> fibers with fixed parameters.
>
> >>
>
> >> >>
>
> >>
>
> >> >> I wish to have a drop down menu (PopUpMenu in Math 8.0 I believe) t=
hat
>
> >>
>
> >> >>
>
> >>
>
> >> >> sets these parameters to fixed values and have a few other paramete=
rs that
>
> >>
>
> >> >>
>
> >>
>
> >> >> are adjustable in my simulation.
>
> >>
>
> >> >>
>
> >>
>
> >> >>
>
> >>
>
> >> >>
>
> >>
>
> >> >> Ideally I wish to have all parameters to be able to be set using
>
> >>
>
> >> >>
>
> >>
>
> >> >> Manipulate or some other sort of way (input string) and have drop d=
own
>
> >>
>
> >> >>
>
> >>
>
> >> >> menus that make these variables "jump" to the defined value.
>
> >>
>
> >> >>
>
> >>
>
> >> >>
>
> >>
>
> >> >>
>
> >>
>
> >> >> My questions are:
>
> >>
>
> >> >>
>
> >>
>
> >> >>
>
> >>
>
> >> >>
>
> >>
>
> >> >> -how can I implement this selection-type menu with fixed parameter =
sets and
>
> >>
>
> >> >>
>
> >>
>
> >> >> -how can I have those parameters be adjustable alongside the above =
met hod?
>
> >>
>
> >> >>
>
> >>
>
> >> >>
>
> >>
>
> >> >>
>
> >>
>
> >> >> Thank you in advance.
>
> >>
>
> >> >>
>
> >>
>
> >> >>
>
> >>
>
> >> >>
>
> >>
>
> >> >> Tam=E1s Lengyel
>
> >>
>
> >> >
>
> >>
>
> >> >
>
> >
>
> >

Date Subject Author
10/6/11 Lengyel Tamas
1/26/13 Peter Čendula
1/26/13 Bob Hanlon
1/29/13 Peter Čendula
1/30/13 Bob Hanlon
1/31/13 Peter Čendula