> E:=7*sin(x)+sin(7*x):plot(E,x=-1..10);

>   f:=t->(t-1)^3+t/10000:plot(f(t),t=0..3); 

>   plot(f(a),a=5/10..15/10);plot(f,0..2); 

> plot(E,t=-1..10);plot(E,-1..10);
Plotting error, empty plot
Plotting error, empty plot
> plot(E,t=-1..10);plot(E,-1..10);
Plotting error, empty plot
Plotting error, empty plot
> plot(f,0.9..1.1,0..1/5000);plot(E,x=3..4,y=-3...-2.8);

> E:=315*x^4-234*x^3-29*x^2+36*x-6:plot(E,x=-3..3,y=-10..10);

> 
> f:=x->piecewise(x<1,x^2,x>=1,1+1/x):plot(f,-1..2,0..3);plot(f,-1..2,0..3,discont=true);

> g:=x->if x<-1 then -sqrt(-(1+x)) else if x<1 then sqrt(1-x^2) else Pi-arccos(x-2) fi fi:
> plot(g,-3..3,-3..2,scaling=constrained);

> f:=x->piecewise(x<-2*Pi,tan(x),x<2,1/(x-1),x>2*Pi,tan(x),x>2,1/(x-1)):
plot(f(x),x=-10..10,y=-5..5,scaling=constrained,discont=true);

> f:=piecewise(x<0,cos(x),x>=0,1+x^2):df:=dif(f,x):ddf:=diff(f,x,x):
> plot([f,df,ddf],x=-2..2,discont=true,color=[red,green,navy]);
Error, (in plot) unable to determine the discontinuities

> f:=p->2*arctan(p^2*x)/Pi;plot([seq(f(p),p=1..7)],x=-6..6,y=-2..2,color=blue); 

> f:=x->exp(-(n*x)^2);plot([seq(f(x),n=1..7)],x=-4..4.,y=-2..2,color=red); 

> f:=(((-x^2)^k)/factorial(2*k)):plot([seq(f(x),k=1..5)],x=-4*Pi..4*Pi,y=-9..9,color=[red,blue,green,pink,yellow]);

> f:=t->7*sin(t)+sin(7*t):plot([t,f(t),t=-1..10]);plot([t,f(t)],t=-1..10);

> plot([2*sin(t),cos(t),t=0..2*Pi],abs=-2..2,ord=-2..2);

> 
> plot([[t+cos(t),2-sin(t),t=0..15],[t,1,t=-1..15],[cos(u),2+sin(u),u=-Pi..Pi],[Pi+cos(u),2+sin(u),u=-Pi..Pi],[5*Pi/2+cos(u),2+sin(u),u=-Pi..Pi],[13+cos(u),2+sin(u),u=-Pi..Pi]],axes=NONE,view=[-1..15,0..3],scaling=constrained,color=[red,black,blue,blue,blue,blue]);

> f:t->(t+3*I)+exp(-2*I*t):plot([Re(f(t)),Im(f(t)),t=-10..10],view[-10..10,2..10],scaling=constrained);

> x:=t->a*t+cos(-2*t):y:=t->3*a+sin(-2*t);plot([seq([x(t),y(t),t=-10..10],a=1..3)]);

> x:=t->cos(2*t):y:=cos(3*(t-0));plot([x(t),y(t),t=-10..10]);

> x:=t->cos(2*t):y:=cos(3*(t-1));plot([x(t),y(t),t=-10..10]);

> x:=t->cos(3*t):y:=cos(4*(t-0));plot([x(t),y(t),t=-10..10]);

> x:=t->cos(2*t):y:=cos(3*(t-0.5));plot([x(t),y(t),t=-10..10]);

> x:=t->cos(3*t):y:=cos(sqrt(2)*(t-0));plot([x(t),y(t),t=-10..10]);

> Re(exp(I*t)*(1/6*exp(5*I*t)));

> Im(exp(I*t)*(1/6*exp(5*I*t)));L:=[1/6,1/3,1/9,-1/6,-1/3,-1/9];

> x:=Re(exp(I*t)*(1+L[i]*exp(5*I*t))):y:=Im(exp(I*t)*(1+L[i]*exp(5*I*t))):plot([seq([x(t),y(t),t=-10..10],i=1..6)]);

> plot(1/(1.5+cos(t)),t=0..2*Pi,coords=polar,scaling=constrained);

> x:=Re(1+L[i]*exp(I*t)):y:=Im(1+L[i]*exp(I*t));plot([seq([x(t),y(t),t=-10..10],i=1..6)]);

> plot(1/(1.5+cos(t)),t=0..2*Pi,coords=polar,scaling=constrained);

> plot(1/(0.5+cos(t)),t=0..2*Pi,coords=polar,scaling=constrained,view=[-1..3,-2..2]);

> plot(t/(Pi-t),t=-20..20,coords=polar,scaling=constrained,view=[-6..6,-2..4]);

> plot(sin(2*t)/3,t=-20..20,coords=polar,scaling=constrained,view=[-1..3,-2..2]);

> seq([plot((a/4)+sin(t),t=-20..20,coords=polar,scaling=constrained,view=[-1..3,-2..2]),a=0..6]);
Error, wrong number (or type) of parameters in function seq

> x:=a->a/4+sin(t);
plot([seq(x(a),a=0..6)],t=-2*Pi..0,coords=polar,scaling=constrained);

> r:=t->2+cos(t-1);
te:=t->(t+(sin(10*t))/5);
plot([r(t),te(t),t=-2*Pi..2*Pi],coords=polar,scaling=constrained);

> plot3d([sqrt(x^2+y^2+1),-sqrt(x^2+y^2+1)],x=-2..2,y=-2..2,axes=framed,scaling=constrained);
Error, (in plot3d) first argument must be either in standard or parametric form

> x^2-y^2-z=0:
> plot3d(((x^2-y^2)/5),x=-5..5,y=-5..5,axes=framed,view=-6..5,scaling=constrained);

> x^2+y^2-z^2=-1:
plot3d({sqrt(x^2+y^2-10),-sqrt(x^2+y^2+10)},x=-5..5,y=-5..5,axes=framed,view=-6..5,scaling=constrained);

> plot3d([(1+cos(u))*cos(v),(1+cos(u))*sin(v),sin(u)],u=0..2*Pi,v=0..2*Pi,axes=none,scaling=constrained);
> 

> plot3d([u*sin(u)*cos(v),u*cos(u)*cos(v),u*sin(v)],u=0..2*Pi,v=0..2*Pi,axes=none,scaling=constrained);

> plot3d(sqrt(z^2+1),t=0..2*Pi,z=-2..2,coords=cylindrical,scaling=constrained);

> plot3d((4/3)^theta*sin(phi),theta=-1..2*Pi,phi=0..2*Pi,coords=spherical);

Warning, the name changecoords has been redefined

Error, division by zero

> X:=(2-v*sin(u/2))*sin(u): Y:=(2-v*sin(u/2))*cos(u):Z:=v*cos(u/2):

plot3d([X,Y,Z],u=0..2*Pi,v=-1..1);

> 
> plot3d(1,phi=0..2*Pi,theta=0..2*Pi,coords=spherical,scaling=constrained);

>