MathGroup Archive 1997

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

Search the Archive

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




  • Prev by Date: Pasting equations into word etc
  • Next by Date: Shaded Symbols in MultipleListPlot
  • Previous by thread: Re: Pasting equations into word etc
  • Next by thread: Shaded Symbols in MultipleListPlot