Re: help me
- To: mathgroup at smc.vnet.net
- Subject: [mg47109] Re: [mg47095] help me
- From: Tomas Garza <tgarza01 at prodigy.net.mx>
- Date: Fri, 26 Mar 2004 03:55:53 -0500 (EST)
- References: <200403251048.FAA09924@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
You could search directly in the mathSource or mathGroup archives in the Wolfram site. I don't remember exactly where I obtained the following from: In[50]:= MandelbrotFunction = Compile[{{c, _Complex}}, -Length[FixedPointList[#1^2 + c & , c, 50, SameTest -> (Abs[#2] > 2. & )]]]; In[51]:= DensityPlot[MandelbrotFunction[x + y*I], {x, -2, 0.5}, {y, -1, 1}, Mesh -> False, AspectRatio -> Automatic, Frame -> False, PlotPoints -> 250]; Tomas Garza Mexico City ----- Original Message ----- From: <natashagualtieri at libero.it> To: mathgroup at smc.vnet.net Subject: [mg47109] [mg47095] help me > I'm searching for a simple programm, compiled with mathematica 5.0, that reproduce fractals! > Mandelbrot sets, Julia sets, Menger sponge..... > Please, could you help me to find it? > >
- References:
- help me
- From: "natashagualtieri\@libero\.it" <natashagualtieri@libero.it>
- help me