Question: Expanding spheres or pulsating points

with(plots);
with(plottools);
a := seq(sphere([1, 1, 1], 5*i), i = 0 .. 10);
b := seq(sphere([3, 3, 3], 5*i), i = 0 .. 10);
display({a, b}, insequence = true);
 

I'm trying to show a couple of expanding spheres but display doesn't seem to like objects with different coordinates.  I would like to try to see if display can do this.  Can it?  How would I use animate and plot3d instead in that case?

Also I think the sphere command has a large overhead.  How would I get a set of points to pulsate into a spheres?

 

Please Wait...