Градиентная заливка с использованием графики в Mathematica
Как я могу создать следующее, используя Rectangle[]
на Graphics[]
?
2 ответов
используя Polygon
вы можете
Graphics[{EdgeForm[Black],
Polygon[{{0, 0}, {3, 0}, {3, 1}, {0, 1}},
VertexColors -> {White, Red, Red, White}]}]
также:
Graphics[Raster[{Range[100]/100}, ColorFunction -> (Blend[{White, Red}, #] &)],
AspectRatio -> .3,
Frame -> True,
FrameTicks -> None]