Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2007
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

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: [mg79921] Re: How show Locator point and its image under a function?
  • From: chuck009 <dmilioto at comcast.com>
  • Date: Thu, 9 Aug 2007 05:10:36 -0400 (EDT)

Here's a nice extension showing a dynamic point on a 3-D surface:

g[{x_, y_}] := {x, y, Sin[x + y]}
DynamicModule[{pts = {{0, 0}}}, 
 Row[{LocatorPane[Dynamic[pts], 
    Show[Graphics[{}, PlotRange -> 5], Axes -> True]], 
   Show[{Graphics3D[
      Dynamic[{Red, PointSize[0.02], Point /@ g /@ pts}], 
      PlotRange -> 5], Plot3D[Sin[x + y], {x, -5, 5}, {y, -5, 5}]}, 
    Axes -> True]}]]

(nice work guys)


  • Prev by Date: Fourier transform : failure with hyperbolic secant and log argument
  • Next by Date: Re: Progess bar in Mathematica
  • Previous by thread: Re: How show Locator point and its image under a function?
  • Next by thread: Re: Re: How show Locator point and its image under a function?