MathGroup Archive 2004

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

Search the Archive

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)
>
> 



  • Prev by Date: Re: Notebook output write to a different file
  • Next by Date: Re: Problems about Graphics
  • Previous by thread: Re: ListContourPlot - different levels
  • Next by thread: Re: ListContourPlot - different levels