Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2009

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

Search the Archive

Fwd: Re: tooltip - evaluate function at point

  • To: mathgroup at smc.vnet.net
  • Subject: [mg98794] Fwd: Re: tooltip - evaluate function at point
  • From: "Cristina Ballantine" <cballant at holycross.edu>
  • Date: Sun, 19 Apr 2009 04:55:22 -0400 (EDT)

David's answer completely solved my problem.

Thank you!

Cristina

-----------------------------
HI Cristina ,

Of course the important question at this point is to see whether we 
are using the same version of Mathematica.  I am doing this with 
Version 7 on OSX.  It seems to work for me both on the contour and 
off of it.

I agree that the documentation for ContourLabels is somewhat obscure.

So, I just tested the code that I sent to you in Mathematica 6 and 
indeed it does not behave properly.  Clearly there is a bug in 
version 6 that was fixed in version 7.

So I have to trick the whole graphics thing in Verions 6  to make 
this work.  Try the following (I use a transparent rectangle above 
the contourplot so that the Tooltip is getting its coordinates from 
the rectangle rather than getting it from the buggy ContourPlot):

With[{plot =
    ContourPlot[Arg[Gamma[x + I*y]] == 0, {x, -10, 10}, {y, -10, 10},
     PlotPoints -> 20, ContourLabels -> None],
   rect = Graphics[{Opacity[0], Rectangle[{-10, -10}, {10, 10}]}]},

  Dynamic@
   Tooltip[Show[plot, rect],
    With[{z = Complex @@ MousePosition["Graphics"]}, {z, Gamma[z]}]]]

Best,

David


At 9:46 PM -0400 4/17/09, you wrote:


>Hi David,
>
>I copied and pasted the code and it does the exact same thing as the 
>previous code you wrote: it gives the value of Gamma at all points 
>other than the points on the curves. At the points of the curves it 
>just gives Arg[Gamma[x+I*y]]==0.
>
>I couldn't find anything in the documentation of ContourLabels 
>referring to tooltip other than "The label can be any expression or 
>graphic, and can include constructs such as Tooltip" but I don't 
>understand what that means.  It seems to me that ContourLabels is 
>just a label on the contours on the plot. If specified, they appears 
>regardless of the position of the mouse. But maybe I am wrong.
>
>Thanks again for your help.
>
>Cristina
>
>>>>  David Reiss <dreiss at scientificarts.com> 04/17/09 9:05 PM >>>
>Hi Crristina,
>
>I am slightly puzzled.  The code that I wrote below does seem to do
>exactly what you wish.  Also if you review the documentation for
>ContourLabels you will see how it controls the tooltip.
>
>Best regards,
>
>David
>
>At 8:43 PM -0400 4/17/09, you wrote:
>
>
>>Hi David,
>>
>>Thank you for looking into this again. Unfortunately, ContourLables
>>doesn't seem to be connected to Tooltip. There must be some other
>>way to turn off the tooltip label and overwrite it with a new label.
>>
>>
>>Best wishes,
>>
>>Cristina
>>
>>>>>   David Reiss <dreiss at scientificarts.com> 04/17/09 8:52 AM >>>
>>Hi Cristina,
>>The problem here seems to be that ContourPlot has built into it a tooltip
>>that tells you which equation the contour lines correspond to.  This
>>actually was what I thought was a bug in my example, but I realize that it
>>is a "feature" of ContourPlot.  I have to think of how to turn that off, as
>>that tooltip seems to preempt any other tooltip that is imposed on the plot
>>as I did.
>>
>>....Ah, this seems to do the trick, I think, using the option ContourLabels
>>-> None]:
>>
>>With[{plot =
>>     ContourPlot[Arg[Gamma[x + I*y]] == 0, {x, -10, 10}, {y, -10, 10},
>>      PlotPoints -> 20, ContourLabels -> None]},
>>   Dynamic@Tooltip[
>>     plot, (With[{z = Complex @@ MousePosition["Graphics"]}, {z, Gamma[z]}])]]
>>
>>Yes, if you look up the ContourLabels documentation, this is indeed what's
>>needed.
>>
>>
>>Does this work for you?
>>
>>
>>Best regards,
>>
>>
>>David
>>
>>
>>On Thu, Apr 16, 2009 at 9:50 PM, Cristina Ballantine <cballant at holycross.edu
>>>   wrote:
>>
>>>   David,
>>>
>>>   Thank you for your help. Unfortunately, this shows the value of Gamma at
>>>   all points other than the points on the solution curves given by
>>>   Arg[Gamma[x+I*y]]==0. When the mouse goes over the points on the curve the
>>>   tooltip gives only "Arg[Gamma[x+I*y]]==0. But I am interested in the value
>>>   of Gamma precisely at the points on the curves above.
>>>
>>>   Best wishes,
>>>
>>>   Cristina
>>>
>>>   >>> <dbreiss at gmail.com> 04/16/09 8:09 PM >>>
>>>   Here is the start of one sort of approach.  It seems ot have some
>  >>  bugginess though.  But perhaps this will get you going:
>>>
>>>   With[{plot =
>>>     ContourPlot[Arg[Gamma[x + I*y]] == 0, {x, -10, 10}, {y, -10, 10},
>>>      PlotPoints -> 20]},
>>>    Dynamic@Tooltip[
>>>     plot,
>>>     (With[{z = Complex @@ MousePosition["Graphics"]},
>>>       {z, Gamma[z]}])
>>>     ]
>>>    ]
>>>
>>>
>>>
>>>   I suspect that someone else will give you a more stable approach....
>>>
>>>   --David
>>>
>>>
>>>
>>>   On Apr 16, 4:18 am, "Cristina Ballantine" <cball... at holycross.edu>
>>>   wrote:
>>>   > I would like to plot the solutions to an equation using ContourPlot and
>>>   > add a tooltip that evaluates a different function at the points on the
>>>   > solution. In particular, for the plot
>>>   >
>>>   > ContourPlot[Arg[Gamma[x + I*y]] == 0, {x, -10, 10}, {y, -10, 10},
>>>   PlotPoints -> 20]
>>>   >
>>>   > when the cursor is over a solution point I would like the ToolTip to
>>>   > display the value of Gamma at that point. Is this possible? If so, any
>>>   > suggestion is greatly appreciated.
>>>   >
>>>   > Cristina
>>>
>>>
>>>
>>
>>
>>--
>>This message and any attachments, may contain confidential and/or
>>legally privileged information.  If you are not the intended
>>recipient of the message by the original sender, please destroy it.
>>Message and attachments copyright (c) 2009, all rights reserved.  Any
>>unauthorized dissemination, distribution or copying is strictly
>>forbidden.
>
>
>--
>
><><><><><><><><><>><><><>><><><>
>     David Reiss, Ph.D;   Scientific Arts, LLC      .  
>     http://www.scientificarts.com
><><><><><><><><><>><><><>><><><>
>This message and any attachments, may contain confidential and/or
>legally privileged information.  If you are not the intended
>recipient of the message by the original sender, please destroy it.
>Message and attachments Copyright (c) 2009, all rights reserved.


-- 

<><><><><><><><><>><><><>><><><>
    David Reiss, Ph.D;   Scientific Arts, LLC      .   
    http://www.scientificarts.com 
<><><><><><><><><>><><><>><><><>
This message and any attachments, may contain confidential and/or
legally privileged information.  If you are not the intended
recipient of the message by the original sender, please destroy it.
Message and attachments Copyright (c) 2009, all rights reserved.

--=__Part7A52D74A.0__=--


  • Prev by Date: Re: Any way to make help browser remember the last position?
  • Next by Date: representing the dihedral group {1,r,r^2...s,sr^2...}
  • Previous by thread: Re: tooltip - evaluate function at point
  • Next by thread: Re: Assuming odd/even functions