Hi!(adsbygoogle = window.adsbygoogle || []).push({});

Here is the code in Mathematica 7.

This plots a sphere with one of the quadrants cut out. I wish to animate this plot by rotating about the body diagonal of the bounding box. With the above Animate, I get te subsequent frames to jump around. How can that be fixed.Code (Text):

sphere = RegionPlot3D[(x^2 + y^2 + z^2 <= 1) && (x < 0 || y < 0 ||

z < 0), {x, -1, 1}, {y, -1, 1}, {z, -1, 1}, Mesh -> False,

Boxed -> False, Axes -> True, AxesOrigin -> {0, 0, 0},

AxesLabel -> {X, y, Z}, PlotPoints -> 50,

ColorFunctionScaling -> False,

ColorFunction ->

Function[{x, y, z}, ColorData["Rainbow"][1 - (x^2 + y^2 + z^2 )]],

ViewPoint -> {1, 1, 1}, ViewVertical -> {1, 0, 0},

ViewCenter -> {0, 0, 0}]

Animate[Show[sphere, ViewVertical -> {Cos[v], Sin[v], 0},

ViewCenter -> {1, 1, 1}], {v, 0, 2 Pi, Pi/20}]

Ultimately, I would like to make a movie clip out of it, what would be the best way to go about doing that.

Thanks in advance.

- N

**Physics Forums - The Fusion of Science and Community**

Join Physics Forums Today!

The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

# Mathematica animation animate

Loading...

Similar Threads - Mathematica animation animate | Date |
---|---|

Mathematica help needed (making an animation) | Jul 22, 2013 |

Animate & animated gif in Mathematica | Apr 19, 2012 |

Animating in mathematica | Feb 24, 2012 |

Mathematica Animate function question | Oct 16, 2011 |

Mathematica: two synchronous animations | Sep 14, 2011 |

**Physics Forums - The Fusion of Science and Community**