Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2007

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

Search the Archive

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


  • Prev by Date: Re: Mathematica 6.0 Desperation
  • Next by Date: Re: Trying to create a clustered StackedBarChart
  • Previous by thread: Re: Mathematica 6.0 Desperation
  • Next by thread: Re: Mathematica 6.0 Desperation