Mathematica

Plot Parametrične enačbe

ParametricPlot[{Sin[u],Sin[2 u]},{u,0,2 Pi}]

ParametricPlot[r^2 {Sqrt[t] Cos[t],Sin[t]},{t,0,3 Pi/2},{r,1,2}]

ParametricPlot[{{2 Cos[t],2 Sin[t]},{2 Cos[t],Sin[t]},{Cos[t],2 Sin[t]},{Cos[t],Sin[t]}},{t,0,2 Pi},PlotLegends->"Expressions"]

ParametricPlot[{{2 r Cos[t],r Sin[t]},{r Cos[t],2 r Sin[t]}},{t,0,2 Pi},{r,0,1},Mesh->False]