ClearAll[betterBlend] Plot[a_, b_, c___, betterBlend[clrs_], d___] ^:= Plot[a, b, PlotStyle -> (Blend[clrs, #1] &) /@ Subdivide[Length[a] ...
確定! 回上一頁