Is there any input for ColorFunction
, which ranges from Black for smallest values, goes through red-orange-yellow and ends in very bright yellow almost white for the highest values of the ListDensityPlot
?
2 Answers
$\begingroup$
$\endgroup$
So you can either pick one here:
{#, ColorData@#} & /@ ColorData["Gradients"] // Short
or create your own with Hue
:
col = Function[Blend[{Black, [email protected], [email protected], White}, Slot[1]]]
or by naming the colours you want:
col1 = Function[Blend[{Black, Red, Orange, Yellow, White}, Slot[1]]]
ListDensityPlot[Table[1/(x^2 + y^2), {x, -2, 2, 4/51}, {y, -2, 2, 4/51}],
ColorFunction -> #]& /@ {col, col1}
$\begingroup$
$\endgroup$
Look at some candiates:
Grid[Partition[
Show[ColorData[#, "Image"], ImageSize -> 110] & /@ (cd =
ColorData["Gradients"]), 4, 4, 1, {}], Spacings -> .5]
Number 47 looks interesting...
cd[[47]]
ColorData[%, "Image"]
(* SunsetColors *)