如何在不透明度的FillingStyle中添加自定义ColorFunction

Question

我想绘制一系列线条，每行填充一个半空格。通过将不透明度设置为小于1的值，我想使重叠突出。我看起来像这样：

Plot[Table[x + a, {a, 0, 5}], {x, -1/2, 1/2}, 
 RegionFunction -> Function[{x, y}, y < 5],
 Filling -> 5, FillingStyle -> Directive[Opacity[0.25]]]

这很好。现在我想以特定方式为每个半空间着色。而不是目前每个的平面阴影，说我想用y值来遮蔽它。即，如果平面阴影颜色为蓝色，则蓝色阴影按y缩放（0最强烈或5最强烈无关紧要）。因此，在第一次重叠时，当两个半空格重叠时，它会自动变为2y，3y。

我该怎么做？

Answer 1

您可以尝试ParametricPlot。例如

ParametricPlot[
 Table[{s, i + s/2 + t}, {i, 0, 2}], {s, 0, 1}, {t, 0, 3}, 
 Mesh -> False, PlotStyle -> Automatic, 
 ColorFunctionScaling -> False,
 PlotRange -> {Automatic, {0, 3}}, 
 ColorFunction -> Function[{x, y, s, t}, 
   Directive[Opacity[0.2], ColorData["NeonColors"][y/3]]], 
 AspectRatio -> 1]

<强>结果：