Services & Resources / Wolfram Forums
MathGroup Archive
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 1995

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

Search the Archive


  • To: mathgroup at
  • Subject: [mg2164] Q: ROTATING ANIMATIONS in MMA?
  • From: Zorro <berriz at>
  • Date: Wed, 11 Oct 1995 01:58:31 -0400
  • Organization: Harvard University, Cambridge, Massachusetts

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

  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 wrt
the window from one frame to the next?

Thanks in advance,


  • Prev by Date: Color in 3D
  • Next by Date: Why gives Plot[GTK,{q,o,30}] negat. min. at q=15 ? (GTK:=1/3 q^2 - 10 q + 100)
  • Previous by thread: Q: ROTATING ANIMATIONS in MMA?
  • Next by thread: Re: Q: ROTATING ANIMATIONS in MMA?