Superficies Planas



>Xo:=1: Yo:=2: Zo:=3:  a:=1: b:=1: c:=1:
>implicitplot3d(a*(x-Xo)+b*(y-Yo)+c*(z-Zo)=0,x=0..3,y=0..3,z=0..5,axes=NORMAL);




>implicitplot3d(x/2+y/3 +z/4=1,x=0..3,y=0..4,z=0..5,axes=NORMAL);

>f:=x+y;
>plot3d(f,x=-1..1,y=-1..1,axes=NORMAL,orientation=[45,80],color=green);


>fig1:=implicitplot3d(2*x-y=0,x=-2..2,y=-2..2,z=-2..2,color=red,axes=NORMAL):
>fig2:=implicitplot3d(x-y=0,x=-2..2,y=-2..2,z=-2..2,color=blue):
>display3d({fig1,fig2},orientation=[-30,65]);




>implicitplot3d(z^2=x^2+4*y^2,x=-4..4,y=-2..2,z=-4..4,axes=framed,shading=ZHUE,grid=[15,15,15],scaling=CONSTRAINED);

>implicitplot3d(x^2+4*y^2-z^2=1,x=-4..4,y=-4..4,z=-4..4,grid=[15,15,15],axes=framed,shading=ZHUE);

>implicitplot3d(x^2-y^2-z^2=1,x=-4..4,y=-4..4,z=-4..4,grid=[15,15,15],axes=framed,shading=ZHUE);

>plot3d([r*cos(t),r*sin(t),r],t=0..2*Pi,r=-2..6);  


>implicitplot3d(x^2+y^2+z^2=4,x=-4..4,y=-4..4,z=-4..4,grid=[15,15,15]);


>sphereplot(1,theta=0..2*Pi,phi=0..Pi);

>sphereplot((1.3)^(rho)*sin(theta), rho=1..2*Pi,  theta=0..Pi, style=patch);


>implicitplot3d(z=1-y^2,x=-2..2,y=-2..2,z=-1..1,axes=NORMAL,grid=[20,20,20]);

>implicitplot3d(z^2+4*y^2=1,x=-1..1,y=-0.5..0.5,z=-1..1,axes=NORMAL,scaling=constrained);


>cylinderplot(1,theta=0..2*Pi,z=-1..1);

>cylinderplot(z+ 3*cos(2*theta),theta=0..Pi,z=0..3);

>b:=implicitplot3d(z=x^2+y^2,x=-4..4,y=-4..4,z=0..4,grid=[20,20,20],color=cyan,style=wireframe):
>d:=implicitplot3d(y=3*x,x=-4..4,y=-4..4,z=0..4,color=blue,style=wireframe):
>c:=spacecurve({[x,3*x,10*x^2],[x,3*x,4]},x=-sqrt(2/5)..sqrt(2/5),color=black,thickness=3):
>display(b,c,d);


  • x^2 = y-4
 
  • x^2+y^2 = 1-z
 
  • x-y = z