Interactive 3D Plotting

xxxxxxxxxx

 

1

@interact

2

def _(N=[5,4,..,1],pp=[5,10,..,30]):

3

    f1(x,y,z,t)=x^2+y^2-.5*z*t^2

4

    f2(x,y,z,t)=x^2+y^2+.5*z*t^2

5

    p1=sum([implicit_plot3d(

6

        f1(x,y,z,i),(x,-i,i),(y,-i,i),(z,-2,2),

7

        color=hue(sin(.24*i)),opacity=1-.15*i,

8

        plot_points=pp,frame=False) for i in [1..N]])

9

    p2=sum([implicit_plot3d(

10

        f2(x,y,z,i),(x,-i,i),(y,-i,i),(z,-1,0),

11

        color=hue(sin(.24*i)),opacity=.3,

12

        plot_points=pp,frame=False) for i in [1..N]])

13

    p3=plot3d(lambda x,y:0,(-N,N),(-N,N),

14

              color='steelblue',opacity=.5)

15

    (p1+p2+p3).show()

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

---

Messages