Services & ResourcesWolfram ForumsMathGroup Archive

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

Re: Redundant manipulate

• To: mathgroup at smc.vnet.net
• Subject: [mg88969] Re: Redundant manipulate
• From: Szabolcs Horvát <szhorvat at gmail.com>
• Date: Thu, 22 May 2008 02:39:24 -0400 (EDT)
• Organization: University of Bergen
• References: <g0rkhs$dv7$1@smc.vnet.net> <200805200623.CAA23027@smc.vnet.net> <g11rbm$ago$1@smc.vnet.net>

Murray Eisenberg wrote:
> What does that Labeled accomplish that the following does not?

Absolutely nothing. ;-)

> 
>    Column[{Slider[Dynamic[10/a, (a = 10/#) &], {1, 10}],
>            Slider[Dynamic[a], {1, 10}], Dynamic[a]},
>            Alignment -> Center]
> 
> Szabolcs Horv=E1t wrote:
>> wiso wrote:
>>> I have a manipulate like this:
>>>
>>> Manipulate[
>>>  Row[{"a = ", a, " b = 2 a = ", b = 2 a}]
>>>  , {a, -10, 10, 1}, {b, -20, 20, 1}]
>>>
>>> If I change a, then b changes, but I also want that when I change b,
>>> then a changes. Thanks.
>>>
>> I'm not sure how to do this with Manipulate, but it is achievable with =
> 
>> Dynamic:
>>
>> Labeled[Column[{Slider[Dynamic[10/a, (a = 10/#) &], {1, 10}],
>>     Slider[Dynamic[a], {1, 10}]}], Dynamic[a]]
>>
> 

• References:
  • Re: Redundant manipulate
    • From: Szabolcs Horvát <szhorvat@gmail.com>