4

I have what I think is a ParametricPlot that is no different in structure from the example for explicitly styling different curves provided in the documentation:

ParametricPlot[ReIm[z[t,#]]&/@{3,4,5},
{t, 0, 10},
PlotLegends->{"foo","bar","baz"},
PlotStyle->{Red,Blue, Green}]

But this produces a figure with one rather than three styles and legends (oddly the last listed for the style and the first listed legend):

enter image description here

How do I get different styles and legends for each curve in my plot?

orome
  • 12,819
  • 3
  • 52
  • 100
  • 2
    ParametricPlot has the attribute HoldAll. I suspect you will get the result you want by wrapping Evaluate around the first argument to ParametricPlot. – chuy Aug 23 '16 at 17:53
  • We don't have your definition of z, but here's an example of what chuy is talking about, using another complex function: http://i.stack.imgur.com/QX56X.png – Jason B. Aug 23 '16 at 17:55

1 Answers1

4

I made up a z[t].

z[t_, i_] := i (Cos[t] + I Sin[t]) + 0.2*(Cos[3 i t] + I Sin[3 i t])

ParametricPlot[
 ReIm[z[t, #]] & /@ {3, 4, 5},
 {t, 0, 10},
 PlotLegends -> {"foo", "bar", "baz"},
 PlotStyle -> {Red, Blue, Green}
 ]

Mathematica graphics

You need to wrap the Map with Evaluate.

ParametricPlot[
 Evaluate[ReIm[z[t, #]] & /@ {3, 4, 5}],
 {t, 0, 10},
 PlotLegends -> {"foo", "bar", "baz"},
 PlotStyle -> {Red, Blue, Green}
 ]

Mathematica graphics

Jack LaVigne
  • 14,462
  • 2
  • 25
  • 37