ParametricPlot[{sin(8*pi*x),cos(4*pi*x)},{x,0,1}]