# Default colors of curves [duplicate]

how may I find the name or definitions of colors which are used by default in Plots. I use WM12 ie, if I plot some function it has "blue" colour, next function has "orange" colour. If I need to plot something else corresponding to these curves I would like to use the same colour but I don't know the names of these colours. If I use Blue it is not the same as "blue" used in the plot. Ok, I may choose all colours by me in PlotStyle but do not look for an alternative solution, I'm interested in the default plot colours.

Thank you all, for help.

• The default colors are from ColorData[97, "ColorList"]. – Rohit Namjoshi May 12 at 12:02
• – Michael E2 May 12 at 20:18

defaultplotcolors =  Cases[#, _?ColorQ, All] &[
"DefaultPlotStyle" /. (Method /. ChartingResolvePlotTheme[Automatic, Plot])]


Alternatively,

defaultColor = "DefaultColor" /. ThemesDefaultStyles[Plot][[All, 2]]

97

ColorData[defaultColor, "ColorList"]


Update: Default colors for various PlotThemes:

 {#, Cases[#, _?ColorQ, All] &["DefaultPlotStyle" /.
(Method /. ChartingResolvePlotTheme[#, Plot])]} & /@
{Automatic, "Marketing", "Business", "Web", "Scientific"} //
Prepend[{"theme", "colors"}] // Grid


You can make a plot of n functions and extract from the result the color specifications.

E.g. with 3 functions:

t = Plot[{Sin[x], Cos[x], Tan[x]}, {x, 0, 2 Pi}];

You may look at "FullForm[t]" and note that there are color specifications in the form of "RGBColors[,,_]". You may pick these out by:

Cases[t, RGBColor[__], Infinity] // FullForm


or visual:

Cases[t, RGBColor[__], Infinity]


• Easier ColorData[97, "ColorList"]. – Rohit Namjoshi May 12 at 12:02