0
$\begingroup$

I am trying to combine 10 different plots using Show. My code has the following form

p1 = ParametricPlot[{f1[x], g1[x]}, x]
p2 = ParametricPlot[{f2[x], g2[x]}, x]
. 
.
.
p10 = ParametricPlot[{f10[x], g10[x]}, x]
Show[p1, p2, p3, p4, p5, p6, p7, p8, p9, p10]

I want legends to appear vertically, on the right side of the plot. Since I am plotting 10 different curves, horizontal legends do not fit in a eps file.

The output is:

enter image description here

$\endgroup$
  • $\begingroup$ How are you constructing the legend? $\endgroup$ – Brett Champion Sep 23 '19 at 18:58
1
$\begingroup$

ParametricPlot can handled multiple parametric curves. Show is not necessary unless you are combining different types of plots.

Clear["Global`*"]

Table[{f[k][x], g[k][x]} = {k*Sin[x], k*Cos[x]}, {k, 1, 10}];

ParametricPlot[
 Evaluate[{f[#][x], g[#][x]} & /@ Range[10]], {x, 0, 2 Pi},
 PlotLegends -> Automatic]

enter image description here

|improve this answer|||||
$\endgroup$

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy

Not the answer you're looking for? Browse other questions tagged or ask your own question.