MathGroup Archive 2006

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

Search the Archive

Re: Graphics--combining graphics

  • To: mathgroup at
  • Subject: [mg66143] Re: [mg66108] Graphics--combining graphics
  • From: ggroup at
  • Date: Sun, 30 Apr 2006 04:22:21 -0400 (EDT)
  • References: <>
  • Reply-to: ggroup at
  • Sender: owner-wri-mathgroup at

Hello spepperchin,

It depends how you're making the animation.  If you are simply making
them for display in Mathematica, just put the two graphics calls in
the same cell, eg:

Table[Plot[Sin[x + t], {x, 0, 2Pi}], {t, 0, Pi/2, Pi/6}];
Table[Plot[Tan[x + t], {x, 0, 2Pi}], {t, Pi/2, Pi, Pi/6}];

All the graphics will be grouped together (assuming no errors or other
output occur in between).

Alternatively, if you are exporting the animation, you can simply join
lists of graphics objects:

plList1 = Table[Plot[Sin[x + t], {x, 0, 2Pi}], {t, 0, Pi/2, Pi/6}];
plList2 = Table[Plot[Tan[x + t], {x, 0, 2Pi}], {t, Pi/2, Pi, Pi/6}];

plList3 = Join[plList1, plList2];
Export["file.gif", plList3, "GIF"]

On Saturday, April 29, 2006 at 3:41 AM, aliens probed Spepperchin and

> I am trying to create an animation of a piecewise function.  I have a graph of a ball rolling and I would like to combine an animation for one equation of motion for the first part with another equation for the second part of the motion.  It is easy enough to create the two animations individually, however I am stumped on how to combine them into one continuous animation. 

> Link to the forum page for this post:
> Posted through [[postId=10007]]

  • Prev by Date: Re: Solving Nonlinear Transcedental equations
  • Next by Date: Re: Graphics--combining graphics
  • Previous by thread: Graphics--combining graphics
  • Next by thread: Re: Graphics--combining graphics