User Portlet User Portlet

Discussions
I allready looked up PlotRange and tried out a lot, but I was not able to get it working. I now tried some things and fixed the Problem with ... ParametricPlot[{r[x],-s[x]}, {x,0,**1**},... even though I mathematically don't understand...