>	with(plots):

Warning, the name changecoords has been redefined

>

;

>	contourplot(-5*x/(x^2 + y^2 + 1),x=-3..3,y=-3..3,filled=true,  coloring=[white,blue]);

We give below 3-d plots of the Legendre polynomials, interpreted in spherical coordinates as appropriate.

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

>	plot3d((3*(cos(theta))^2-1)/2,theta=0..Pi,phi=0..2*Pi,coords=spherical,style=patch,scaling=constrained);

>	plot3d(LegendreP(3,cos(theta)),theta=0..Pi,phi=0..2*Pi,coords=spherical,style=patch,scaling=constrained,projection=0.5);

>	plot3d(LegendreP(4,cos(theta)),theta=0..Pi,phi=0..2*Pi,coords=spherical,style=patch,scaling=constrained,projection=0.5);

>