MathGroup Archive 1994

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

Search the Archive

movie distortortion

  • To: mathgroup at
  • Subject: [mg308] movie distortortion
  • From: mwl at trantor.Jpl.Nasa.Gov (Martin W. Lo)
  • Date: Fri, 9 Dec 1994 10:49:13 -0800

Dear mathgroup,

I'm having problem with ShowAnimation[].  I'm trying to animate an orbit
about earth.  When I animate the orbit by itself, it works just fine.  But
when I include the earth, the scale keeps changing on me.  I thought by
providing PlotRange, the scale is supposed to be fixed.
Setting BoxRatios -> {1,1,1} makes doesn't solve the problem;
it also causes the sphere to go through a squashing deformation.
What should I do to fix this?

Thanks for your help.

Martin Lo

Here is my code fragment:

data = an orbit about earth

      Line[Take[data, n]]}],earth3D}, nnn],
      PlotRange -> ppp]

nnn = {n,1,300,30}
ppp = {{-7000, 7000}, {-7000, 7000}, {-7000, 7000}}
CENTER  = {0.,0.,0.};
earth3D = ParametricPlot3D[{r Sin[u]*Cos[v]+CENTER[[1]],
                     r Sin[u]*Sin[v]+CENTER[[2]],
                     r Cos[u]       +CENTER[[3]]}, 
                     {u, 0, Pi}, {v, 0, 2*Pi},
                     Boxed -> False,Axes->False]

  • Prev by Date: Part specifiers in a list.
  • Next by Date: Multidimensional Fourier Transform (Resend)
  • Previous by thread: Part specifiers in a list.
  • Next by thread: Multidimensional Fourier Transform (Resend)