Random Parametric 3D Plotting

xxxxxxxxxx

 

1

var('t'); a,b,c=randint(2,12),1+random(),randint(1,7)

2

r=[-c..c]; th=randint(1,9)

3

def col(): 

4

    return sage.plot.colors.float_to_html(

5

        random(),random(),random())

6

st=r'<p style="color:#aa00ff;">$a=%d; \; b=%f; \; c=%d$</p>'

7

pretty_print(html(st%(a,b,c)))

8

fx=(a+cos(b*t))*cos(t); fy=(a+cos(b*t))*sin(t); fz=a*sin(b*t)

9

sum([parametric_plot3d(

10

    [i*fx,j*fy,i*fz],(-2*pi,2*pi),frame=False,thickness=th/10,

11

    color=col()) for i in r for j in r])

Language: Sage Gap GP HTML Macaulay2 Maxima Octave Python R Singular

---

Messages