MathGroup Archive 1995

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

Search the Archive


Zorro <berriz at> wrote:

>Hi.  I'm trying to produce an animation of a 3-D object to simulate
>the smooth rotation of the object about the vertical axis.  I came  
>up with

>  Table[Show[3DObject, Boxed -> False,
>  ViewPoint->{ 2 Cos[n 2 Pi/60], 2 Sin[n 2 Pi/60],2 }],
>  {n, 0, 60}];

>This *almost* worked.  The only problem is that Mathematica doesn't
>keep the size of 3DObject constant (wrt to the rest of the window)
>from one frame to the next, so the image zooms in and out as it
>rotates (a semi-cool effect, in face, but not exactly what I had in
>mind).  How can I get Mathematica to keep the image size constant
>wrtthe window from one frame to the next?

Try the option SphericalRegion -> True inside Show.

Allan Hayes
hay at

  • Prev by Date: inequalities
  • Next by Date: Re: help functions
  • Previous by thread: inequalities
  • Next by thread: Re: ROTATING ANIMATIONS in MMA?