Ez grafika SageMath segítségével készült.

center_color = 'red'
kissing_opacity = .55
S = sphere((0,0,0), 1, color=center_color)
phi = 1/2
ts = [0..8*pi/5, step=2*pi/5]
others = sphere((0,0,2), 1, opacity=kissing_opacity) + \
  sum([sphere((2*cos(t)*cos(phi), 2*sin(t)*cos(phi), 2*sin(phi)), opacity=kissing_opacity) for t in ts])
all = S + others + others.scale(-1,-1,-1)

Ez a fájl a Creative Commons Nevezd meg! – Így add tovább! 3.0 Unported licenc alapján használható fel.

A következőket teheted a művel:

• megoszthatod – szabadon másolhatod, terjesztheted, bemutathatod és előadhatod a művet
• feldolgozhatod – származékos műveket hozhatsz létre

Az alábbi feltételekkel:

• Nevezd meg! – A szerzőt megfelelően fel kell tüntetned, hivatkozást kell létrehoznod a licencre és jelezned kell, ha a művön változtatást hajtottál végre. Ezt bármilyen észszerű módon megteheted, kivéve oly módon, ami azt sugallná hogy a jogosult támogat téged vagy a felhasználásod körülményeit.
• Így add tovább! – Ha megváltoztatod, átalakítod, feldolgozod ezt a művet, a közreműködésedet csak az eredetivel megegyező vagy hasonló licenc alatt terjesztheted.

https://creativecommons.org/licenses/by-sa/3.0CC BY-SA 3.0 Creative Commons Attribution-Share Alike 3.0 truetrue

This image was generated by Robert Bradshaw in Sage with the following code:

center_color = 'red'
kissing_opacity = .55
S = sphere((0,0,0), 1, color=center_color)
phi = 1/2
ts = [0..8*pi/5, step=2*pi/5]
others = sphere((0,0,2), 1, opacity=kissing_opacity) + \
  sum([sphere((2*cos(t)*cos(phi), 2*sin(t)*cos(phi), 2*sin(phi)), opacity=kissing_opacity) for t in ts])
all = S + others + others.scale(-1,-1,-1)
all.show(aspect_ratio=[1,1,1], frame=False)

• 2008-02-21 18:01 Robertwb 424×437× (109502 bytes) This image was generated by Robert Bradshaw in Sage with the following code: center_color = 'red' kissing_opacity = .55 S = sphere((0,0,0), 1, color=center_color) phi = 1/2 ts = [0..8*pi/5, step=2*pi/5] others = sphere((0,0,2), 1, opacity=kissing_opacit