Re: Mathematica 6.0 Desperation
- To: mathgroup at smc.vnet.net
- Subject: [mg83689] Re: [mg83638] Mathematica 6.0 Desperation
- From: Curtis Osterhoudt <cfo at lanl.gov>
- Date: Wed, 28 Nov 2007 05:37:10 -0500 (EST)
- Organization: LANL
- References: <200711271106.GAA15612@smc.vnet.net>
- Reply-to: cfo at lanl.gov
Hi, Jesus,
The exact choices for PlotPoints and MaxRecursion below might not give you
enough resolution, but should get you started. As far as I can tell, there's
a bit of a tricky tradeoff between PlotPoints and MaxRecursion. Anyway, try
the following:
DensityPlot[JuliaTest[x, y, 50, -0.75 + 0.5*I], {x, 1.24, 1.27},
{y, -0.13, -0.1}, PlotPoints -> 40, Mesh -> False,
MaxRecursion -> 4]
Good luck!
C.O.
On Tuesday 27 November 2007 04:06:02 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]
--
==========================================================
Curtis Osterhoudt
cfo at remove_this.lanl.and_this.gov
PGP Key ID: 0x4DCA2A10
Please avoid sending me Word or PowerPoint attachments
See http://www.gnu.org/philosophy/no-word-attachments.html
==========================================================
- References:
- Mathematica 6.0 Desperation
- From: "Jesus M. Goiri" <jesgoiri11@mac.com>
- Mathematica 6.0 Desperation