|
Re: How on Earth?
Posted:
Sep 10, 2012 4:16 AM
|
|
The appearance can change significantly by just varying the color scheme.
Partition[ DensityPlot[ Sin[129*Abs[(x + I y)^-1]], {x, -2.5, 2.5}, {y, -2.5, 2.5}, PlotLabel -> #, PlotPoints -> 18, Mesh -> False, Frame -> False, ColorFunction -> #] & /@ {Hue, "TemperatureMap", "NeonColors", "GreenPinkTones", Blend[{Red, Yellow}, #] &, Blend[{Red, Blue, Yellow}, #] &}, 3] // Grid
Or by changing the PlotPoints
Partition[ DensityPlot[ Sin[129*Abs[(x + I y)^-1]], {x, -2.5, 2.5}, {y, -2.5, 2.5}, PlotLabel -> "PlotPoints -> " <> ToString[#], PlotPoints -> #, Mesh -> False, Frame -> False, ColorFunction -> Hue] & /@ Range[4, 12], 3] // Grid
Bob Hanlon
On Sun, Sep 9, 2012 at 5:32 PM, Chris Degnen <degnen@cwgsy.net> wrote: > DensityPlot[Sin[129*Abs[(x + I y)^-1]], {x, -2.5, 2.5}, {y, -2.5, 2.5}, > PlotPoints -> 18, Mesh -> False, Frame -> False, ColorFunction -> Hue] > > c/o http://intothecontinuum.tumblr.com/page/14 > > >
|
|