MathGroup Archive 2007

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

Search the Archive

Re: How show Locator point and its image under a function?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg79880] Re: How show Locator point and its image under a function?
  • From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
  • Date: Wed, 8 Aug 2007 04:43:15 -0400 (EDT)
  • Organization: Uni Leipzig
  • References: <f990t4$c2d$1@smc.vnet.net>
  • Reply-to: kuska at informatik.uni-leipzig.de

Hi Murray,

Manipulate[
  Row[{Framed@Graphics[Point[pt], PlotRange -> 5],
    Framed@Dynamic[Graphics[Point[f[pt]], PlotRange -> 5]]}],
  {{pt, {-1, 1/2}}, Locator}
  ]

may do it
Regards
   Jens

Murray Eisenberg wrote:
> The following code displays a fixed point and its image under a 
> specified function f:
> 
>    f[{x_,y_}]:={2x+1,y+2}
>    Module[{pt = {-1, 0.5}},
>       Row[{
>         Framed@Graphics[Point[pt], PlotRange -> 5],
>         Framed@Graphics[Point[f[pt]], PlotRange -> 5]
>       }]
>     ]
> 
> Now I want to have the point in the left-hand graphic to be dynamic, 
> controlled by a Locator, and to have its changed image under the 
> function to be shown in the right-hand graphic.
> 
> The idea is something like the following (WRONG!) code:
> 
>    DynamicModule[{pts={{0,0}}},
>      Row[{
>        LocatorPane[Dynamic[pts],Graphics[{},PlotRange->5]],
>        Graphics[Dynamic[f/@pts],PlotRange->5]
>      }]
>    ]
> 
> That code produces error messages, "1 is not a Graphics primitive or 
> directive", "2 is not a Graphics primitive or directive".
> 
> How can it actually be done?
> 


  • Prev by Date: Re: How show Locator point and its image under a function?
  • Next by Date: Re: Projectile motion
  • Previous by thread: Re: Re: How show Locator point and its image under a function?
  • Next by thread: Re: How show Locator point and its image under a function?