wolfram mathematica plot color