wxdraw2d(color=red,explicit(sin(x),x,0,2*%pi),color=blue,explicit(sin(x),x,2*%pi,4*%pi))$

wxdraw2d(polar(2,p,0,10),xrange=[-5,5],yrange=[-3,3])$