Re: Mathematica 3.0.0 on WinNT 4: Bug in Show[]
- To: mathgroup at smc.vnet.net
- Subject: [mg8855] Re: Mathematica 3.0.0 on WinNT 4: Bug in Show[]
- From: w.cyrmon at htlwrn.ac.at (Werner Cyrmon)
- Date: Tue, 30 Sep 1997 20:16:15 -0400
- Organization: HTBLuVA Wr. Neustadt (edu)
- Sender: owner-wri-mathgroup at wolfram.com
Gregor Overney <overney at worldnet.att.net> wrote:
>Please try the following code that should overlap a CountourPlot
>together with a
>DensityPlot using Mathematica 3.0.0 on WinNT 4.0. Any idea how to fix
>this
>problem?
>If you are replacing PlotPoints->300 with PlotPoints->100 and
>PlotPoints->200 with
>PlotPoints->50, respectively, it should work, but then the quality of
>the output is far
>from publication quality.
>I do not think that the problem is related to RAM size, nor do I believe
>that a hardware
>related problem (e.g. graphics board, CPU, ...) could cause this strange
>behavior.
>gregor
>Func[x_, y_] = Sin[x^2*y - 4 x*y^2] + x*y;
>Cont1 = DensityPlot[
> Func[x, y], {x, -nres, nres}, {y, -nres, nres},
> PlotPoints -> 300, Mesh -> False, ColorFunction -> Hue,
> DisplayFunction -> Identity];
>Cont2 = ContourPlot[Func[x, y], {x, -nres, nres}, {y, -nres, nres},
> PlotPoints -> 200, Contours -> {0}, ContourShading -> False,
> ContourStyle -> {RGBColor[0, 0, 0]}, DisplayFunction ->
>Identity];
>Show[{Cont1,Cont2}, DisplayFunction -> $DisplayFunction];
It works fine (and whow, it looks good too!) on Mathematica 3.0.1 (I
set nres=-Pi) and NT4
Ciao
Werner