Complex plot wolfram mathematica