MathGroup Archive 2009

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

Search the Archive

Plot3D, show and text

  • To: mathgroup at smc.vnet.net
  • Subject: [mg98311] Plot3D, show and text
  • From: "Marc ESCALIER" <marc.escalier at dbmail.com>
  • Date: Sun, 5 Apr 2009 06:40:11 -0400 (EDT)

Hello,

Is there an expert over there, who would able to add, using mathematica:
a text "abc" at position "1,1,2" and
a text "def" at position "2,2,4", by :

keeping same looking at the original plot (no changing of ratio x, y, z)
keeping Show (because i need to put other stuff inside)

Show[Plot3D[-8*(x*x+y*y)+(x*x+y*y)*(x*x+y*y),{x,-3,3},{y,-3,3},BoxRatios-=
>{3,4,2},Mesh->None,ClippingStyle->None,RegionFunction->Function[{x,y,z},=
x^2+y^2<9 && x<2],Boxed->False,Axes->True,AxesOrigin->{0,0,-16.5}]

thank you


  • Prev by Date: Re: Minimize goes into infinite loop?
  • Next by Date: Re: release memory
  • Previous by thread: Re: Partial derivatives for implicit functions
  • Next by thread: Re: Plot3D, show and text