Advanced Search

Question: Random spheres giving random axes. Help.....

Question:Random spheres giving random axes. Help.....

ahgoodthesea 4 Maple
plot
June 09 2007
0
Hi,
I'm trying to animate a group of spheres moving randomly in a box but am having difficulty getting the axes to show up. Specifically i want to be able to export as a GIF, for use in a presentation but when I insert a static set of axes with an arbitrary empty bit of a plot it won't let me export. I can define a set of axes as below, but i can't seem to control the size. Any ideas how to define the axes size in the following bit of maple for one sphere?
Thanks greatly in advance.

> restart;with(plots): with(plottools):with(linalg):with(stats):
> x10:=10:y10:=10:z10:=10:
> ball1 := sphere( [x10,y10,z10], grid=[10,10],axes=normal,color=blue):
> for i from 1 to 30 do
> j:=i-1:
> x1||i:=x1||j+2*(stats[random,uniform](1)-0.5);
> y1||i:=y1||j+2*(stats[random,uniform](1)-0.5):
> z1||i:=z1||j+2*(stats[random,uniform](1)-0.5):
> end do:
> balls1:=seq( translate(ball1,x1||i,y1||i,z1||i), i=0..30):
>
>
>
> display(balls1,axes=boxed, insequence=true);
>
Please Wait...