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