Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2009

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

Search the Archive

Re: 3D plots and using mouse click-drag to rotate - why the extra

  • To: mathgroup at smc.vnet.net
  • Subject: [mg98829] Re: [mg98780] 3D plots and using mouse click-drag to rotate - why the extra
  • From: "David Park" <djmpark at comcast.net>
  • Date: Mon, 20 Apr 2009 01:33:00 -0400 (EDT)
  • References: <26761488.1240133166891.JavaMail.root@n11>

Ever since Version 6 the Presentations package has had a NiceRotation
command that can be inserted among the options in a Draw3DItems statement.

But, in any case, it is just a convenience and you can easily duplicate it.

NiceRotation
Sequence[SphericalRegion -> True, RotationAction -> "Clip"]

So

Plot3D[Sin[x y] + 10, {x, -3, 3}, {y, -3, 3},
 SphericalRegion -> True, RotationAction -> "Clip",
 AxesOrigin -> {0, 0, 10},
 Boxed -> False,
 PlotRange -> {Automatic, Automatic, {0, 20}}]


David Park
djmpark at comcast.net
http://home.comcast.net/~djmpark/  



From: Bob F [mailto:deepyogurt at gmail.com] 


When you create a 3D plot and then use the mouse to click-drag to
rotate the surface to view it from another angle, there is always an
extra translation thrown in by Mathematica as soon as you let the
mouse button go after this click-drag. However, if you do an Option-
click to zoom in or out and then let go there is no extra translation,
and thereafter if you click-drag as before there is no extra
translation after letting go of the mouse button. Is this extra
translation at the end something that you can prevent without having
to resort to the Option-click/zoom step?? I am on a Mac with version
7.0.1 (I think this has occured for a long time, but can't verify it
right now). So for example if you try something like:

Plot3D[Sin[x y] + 10, {x, -3, 3}, {y, -3, 3},
 AxesOrigin -> {0, 0, 10}, Boxed -> False,
 PlotRange -> {Automatic, Automatic, {0, 20}}]

and then click-drag to rotate to look at the bottom and let go there
is an extra little jump that the surface goes thru when you let the
mouse button go. Then do an Option-click and zoom in and out to still
maintain the entire surface in view and let go and no extra jump
either. Now do a click-drag again and let go and no extra little
translation any more (until you re-execute the cell again).

Comments?

-Bob




  • Prev by Date: Re: Basic Macintosh text editing features??
  • Next by Date: Re: 3D plots and using mouse click-drag to rotate - why the extra
  • Previous by thread: Re: 3D plots and using mouse click-drag to rotate - why the extra
  • Next by thread: Re: 3D plots and using mouse click-drag to rotate - why the extra