Re: How can I generate this graphic?
- To: mathgroup at smc.vnet.net
- Subject: [mg113609] Re: How can I generate this graphic?
- From: Vicent <vginer at gmail.com>
- Date: Thu, 4 Nov 2010 04:01:16 -0500 (EST)
On Wed, Nov 3, 2010 at 10:22, M.Roellig <markus.roellig at googlemail.com>wrote: > Hi, just an example to get you going: > > DataForPlotting = Table[Sin[x] y, {x, 1, 20, 1}, {y, 1, 20, 1}]; > ListContourPlot[DataForPlotting, InterpolationOrder -> 0, > ContourLabels -> All, PerformanceGoal -> "Quality", Mesh -> All, > MeshStyle -> Directive[GrayLevel[0.2], Thickness[0.005]], > ColorFunction -> (Blend[{Orange, Yellow, White}, #] &), > FrameLabel -> {Style["x", Large, Italic, FontFamily -> "Arial"], > Style[Rotate["y", -(\[Pi]/2)], Large, Italic, > FontFamily -> "Arial"]}, FrameTicks -> None, > PlotRangePadding -> 0] > > Markus > > Markus, Thank you very much!! There are so many options at Mathematica that sometimes it is difficult to know them all. That is a very good hint. Now I'll keep on tuning the graphic by myself. Thanks again. -- Vicent Giner-Bosch