Visualizing functions that depend on a complex variable is oftentimes done with either contour plots or with multiple one dimensional plots where either the real or imaginary part is set to a selection of fixed values. This Mathematica function will combine both plots to provide the nice overview of the contour plot, while making it easy to compare it with the 1D lines.

An example:

supercontourplot

The option centerColormap can be used to assign the color in the “middle” of the color map (in this case white) to a fixed value, which comes in handy, when e.g. zero has a special meaning and it is important whether we are below or above it. Applied to the last example, this gives:

supercontourplot centered

The code:

Above plots were created with

superComplexContourPlot[-1/3+(Abs[x]+1/10 Re[x]+Im[x]^3)/(1+Abs[x]),x,"My Expression"]

Respectively

superComplexContourPlot[-1/3+(Abs[x]+1/10 Re[x]+Im[x]^3)/(1+Abs[x]),x,"My Expression",centerColormap->True,centerColormapAt->0]

(where centerColormapAt->0 can be left out). To see the options of the command, type ?superComplexContourPlot. All other options given to the function will be passed on to ContourPlot.