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)
기존 올리기 기록
The original description page was here. All following user names refer to en.wikipedia.
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
{{Information |Description={{en|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 = sph