[Date Index] [Thread Index] [Author Index]

Re: ListContourPlot - different levels

• To: mathgroup at smc.vnet.net
• Subject: [mg51974] Re: ListContourPlot - different levels
• From: "Jens-Peer Kuska" <kuska at informatik.uni-leipzig.de>
• Date: Sat, 6 Nov 2004 02:07:35 -0500 (EST)
• Organization: Uni Leipzig
• References: <cmfbo8$7fj$1@smc.vnet.net>
• Sender: owner-wri-mathgroup at wolfram.com

Hi,

ContourPlot[] generate colored polygons and  if you draw the polygons of
two contour plots the polygons of the second one will overlay and hide
the other. But you can use the contour lines

fun = Exp[-x^2 - y^2]*x;
Block[{$DisplayFunction = Identity},
cpl1 = ContourPlot[Evaluate[fun], {x, -2, 2}, {y, -1, 1},
Contours -> Table[-0.1*i, {i, 0, 6}]];
cpl2 =
ContourPlot[Evaluate[fun], {x, -2, 2}, {y, -1, 1},
Contours -> Table[0.1*i, {i, 0, 6}]]
];
Show[
Graphics[{RGBColor[1, 0, 0],
Cases[Graphics[cpl1], _Line, Infinity]}],
Graphics[{RGBColor[0, 1, 0],
Cases[Graphics[cpl2], _Line, Infinity]}]
]

Regards

  Jens


"MaxAO" <maxao at aol.com> schrieb im Newsbeitrag 
news:cmfbo8$7fj$1 at smc.vnet.net...
> Is there any way to define different contourlevels (e.g. ..., -0.1, 0.0, 
> 0.1,
> 0.2, 0.3, ... and e.g. ..., -0.2, 0.0, 0.2, 0.4, 0.6,...) in one
> ListContourPlot (see 'Mathematica Graphics', Tom Wickham-Jones)?
> The different rages of contourlevels should be dependent of x- and 
> y-position.
>
> I hope my  qustion is clear enough.
>
> Thank you,
>
> Martin (maxao at aol.com)
>
>