5.54 Nice plot from Maple

from Serge from the net:

restart; 
with(geom3d): 
plane(OYZ,x=0,[x,y,z]): 
plane(OXZ,y=0,[x,y,z]): 
plane(OXY,z=0,[x,y,z]): 
c:=1/2:r:=1/4: 
L:=combinat[permute]([-c$3,c$3],3): 
S:=seq(sphere(s||i,[point(A||i,op(op(i,L))),r]),i=1..8): 
draw([OYZ,OXZ,OXY,S]);