How can I use the option PlotStyle to start plotting with second color in standard color rotation?

Question

I would like to plot several functions in one plot and start the standard color rotation (ColorData[97, "ColorList"] // InputForm) from the second color and go on from there. What is the syntax for doing that?

score 1 · Accepted Answer · answered Apr 14 '16 at 10:11

1

PlotStyle->(ColorData[97][#]&/@Range[2,n+1])

answered Apr 14 '16 at 10:11

Quantum_Oli

7,964
2
21
43

Looks good but trying it, it still starts with the color blue rather than earth. Minimal Example: Plot[{x,x^2}, {x, 0, 180},PlotStyle -> (ColorData[97][#] & /@ Range[2, n + 1])] – Asking Questions Apr 14 '16 at 10:14
You need to set n to the number of functions you are plotting, in this case 2 – Quantum_Oli Apr 14 '16 at 10:16
That works, let's put that into the answer as a note. – Asking Questions Apr 14 '16 at 10:17
4

You could just use PlotStyle -> Rest[ColorData[97, "ColorList"]] if I'm reading the question correctly – Jason B. Apr 14 '16 at 10:18
1

Or RotateLeft[ColorData[97, "ColorList"]] if you still want the first color, but you want it to come in last – Jason B. Apr 14 '16 at 10:19
Yeah do that! It's a shame something like PlotStyle -> (ColorData[97][# + 1] &) doesn't work – Quantum_Oli Apr 14 '16 at 10:19
PlotStyle -> Rest[ColorData[97, "ColorList"]] also works just fine – Asking Questions Apr 14 '16 at 10:20

score 1 · Answer 2 · answered Apr 14 '16 at 14:52

1

Just to be perverse, I suggest making the 1st function a constant that will be skipped in the plotting. This has the advantage that you don't need to know the default color list is no. 97.

Plot[Evaluate @ {0, Sequence @@ Table[Sin[k x], {k, 3}]}, {x, 0, 2. π},
  PlotStyle -> {None, Sequence @@ Table[Automatic, 3]}]

answered Apr 14 '16 at 14:52

m_goldberg

107,779
16
103
257

interesting solution – Asking Questions Apr 14 '16 at 16:42

How can I use the option PlotStyle to start plotting with second color in standard color rotation?

2 Answers2

Linked