Advanced Search

Question: How to draw several animated spheres?

Question:How to draw several animated spheres?

ayayaika 5 Maple 11
animate sphere 3d
December 14 2011
1

Hello, can you help me? I need to draw a simple model of solar system (9 planets around the sun). I tried to draw planets with

> a[1] := animate(implicitplot3d,

                            [

                               (x-R*sin(t))2 + (y-R*cos(t))2 + z2 = r2),

                               x=-200..200, y=-200..200, z=-200..200

                            ],

                            t=0..2*Pi

               ):

....

> display(a);

but spheres with small radius were not spheres at all. So I added numpoints = 40000. I waited for a long time and stopped compilation because it was too long. How can I do my task faster and may be simplier?  
Please Wait...