Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]


Groups > comp.soft-sys.math.maple > #305

Black color for main object in Mandelbrot Set

From "George Kalas" <kalas@privacy.net>
Newsgroups comp.soft-sys.math.maple
Subject Black color for main object in Mandelbrot Set
Date 2012-01-12 22:35 +0200
Organization Aioe.org NNTP Server
Message-ID <jeng5u$bc0$1@speranza.aioe.org> (permalink)

Show all headers | View raw


Hi everyone,

The following Maple 9 code produces the Madelbrot Set:

with(plots):

MS:=proc(x,y)
local m,z,c;
c:=evalf(x+y*I);
m:=0;z:=0;
to 100 while abs(z)<2 do #100 is the iterations, 2 is the bailout
z:=evalf(z^2+c);
m:=m+1;
od;
log(m);
end:

cx:=0:
cy:=0:
wx:=2:
wy:=wx:

plot3d(MS, cx-wx..cx+wx, cy-wy..cy+wy, grid=[200,200], shading=ZHUE, 
style=PATCHNOGRID, orientation=[-90,0], axes=BOX);

Does anyone see a quick way to change the color of the main set to black instead 
of red?

The way I see it, ZHUE assigns a color to a color palette which comes from 0 to 
100 iterations. Is there a way to except the main object from the ZHUE and color 
it black or do I have to explicitly add code for it?

Thanks,
--
I. 

Back to comp.soft-sys.math.maple | Previous | NextNext in thread | Find similar | Unroll thread


Thread

Black color for main object in Mandelbrot Set "George Kalas" <kalas@privacy.net> - 2012-01-12 22:35 +0200
  Re: Black color for main object in Mandelbrot Set acer <maple@rogers.com> - 2012-01-13 19:30 -0800
    Re: Black color for main object in Mandelbrot Set "I.N. Galidakis" <morpheus@olympus.mons> - 2012-01-14 13:16 +0200

csiph-web