Creating ContourPlots of Complex Functions

The following graphic isn't exactly the same color as the one shown onf the visualization page, but the colors are close.  This demonstrates how to use ColorFunction to add flare to a simple ContourPlot.  In this case, the Riemann Zeta function is plotted in the complex plane.

ContourPlot[Im[Zeta[x + I y]], {x, -10, 10}, {y, -10, 10}, 
        PlotPoints -> 100, 
        ColorFunction -> (Hue[ .15 # +  .03] &), 
        ImageSize -> 600];