Re: Mathematica 6.0 Desperation
- To: mathgroup at smc.vnet.net
- Subject: [mg83695] Re: Mathematica 6.0 Desperation
- From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
- Date: Wed, 28 Nov 2007 05:40:32 -0500 (EST)
- References: <figtq9$fa7$1@smc.vnet.net>
Hi,
when you set down the PlotPoints-> 50 and render the mesh
DensityPlot[
JuliaTest[x, y, 50, -0.75 + 0.5 I], {x, 1.24,
1.27}, {y, -0.13, -0.1}, PlotPoints -> 50, Mesh -> All,
ColorFunction -> Hue]
you see that Mathematica is adaptive in the space subdivision,
so, you don't need to set an high value for the plot points.
Regards
Jens
Jesus M. Goiri wrote:
> Dear Sirs
>
> I have tried some items that seem to hang Mathematica 6.0. However
> they work perfectly fine in the 5.2 version. I have tried to
> discover the flaw and I have not been able to do so. The problem
> pertains at some code I extracted from a book about Mathematica
> applications by Boccara, particularly the examples that relate to
> fractals, Julia and Mandelbrot Sets.
>
> I have below the lines of code. I you try them, I'd wish to see if
> you are able to make them work.
>
> Yours sincerely,
>
> Jesus M, Goiri
>
> Clear[JuliaTest]
> JuliaTest = Compile[{x, y, {n, _Integer}, {c, _Complex}},
> Module[{z, num = 0}, z = x + y I;
> While[Abs[z] < 2.0 && num < n, z = z^2 + c; num++]; num]]
> DensityPlot[JuliaTest[x, y, 50, -0.75 + 0.5 I],
> {x, 1.24, 1.27}, {y, -0.13, -0.1}, PlotPoints -> 500,
> Mesh -> False, ColorFunction -> Hue]
>
>