|
Fractal of the Day
by Jim Muth
|
|
Fractal enthusiasts and visionaries: It's been a rather exciting day here at Fractal Central, with a hostage standoff situation in progress only 2 miles (3km) away. But that has had no effect on the fractals, which once again appeared almost by magic, as though nothing had happened. And today's fractal, at least in my opinion, earns an above average rating of 7. To create today's image, I entered some of my more bizarre parameters into the M-Mix4 formula, finally finding the interesting fractal that results when 1/Z is added to 666*Z^666 before adding C. I chose the number 666 because that number is considered apocalyptic in some circles, and I enjoy defying danger. Today's FOTD is another of those unlikely images, since one would suppose that 666 parts of Z^666 would simply obliterate one measly part of 1/Z, resulting in a boring open circle with 665 tiny identical bays. In the world of fractals however, things are seldom as one would suppose, and instead of the boring circle, the expression fills the screen with an interesting fractal. I named the picture "Midget Inferno" after deciding on the dark red and black color scheme for the scene, which gives the impression of lurid flashes of red breaking through billowing clouds of black smoke. The parameter file takes 4 minutes to render. The JPEG image has been posted as always to the Usenet binary newsgroup: The fractal weather today was raw. Heavy clouds off the ocean, and a chilly wind of 42 degrees F (5.5 degrees C) made conditions too unpleasant for the cats to venture out of doors. They passed the day instead in frustrated comfort, stretched in front of their favorite radiator. As for the philosophy of the day -- it's still inside me, where there are lots of thoughts that I haven't had a chance to compose. But in a day of two I'll have the ideas hatched and ready to propose on the Philofractal list. So keep tuned to that list. You wouldn't want to miss the enlightenment, nor would you want to miss your chance to correct a mistaken wannabe philosopher. Until tomorrow, take care, and save the best fractal until last. Jim Muth jamth@mindspring.com |
START 20.0 PAR-FORMULA FILE================================
Midget_Inferno { ; time=0:04:00.30 SF5 on a P200
; Version 2000 Patchlevel 9
reset=2000 type=formula formulafile=critical.frm
formulaname=MandelbrotMix4 function=ident passes=1
center-mag=-0.18405946781424860/+0.12052312284457740\
/8.7115e+008/1/-117.499 params=1/-1/666/666/0/0
float=y maxiter=2500 inside=0 logmap=77 symmetry=none
periodicity=10
colors=000825<3>H47J47L57O58<11>dABeABfAC<3>lDDmEDnG\
FoIE<3>nPDnQDmRD<3>lVBlWBkXBkYBkZA<3>mb9nc9sc2wc5uc7\
rd9<3>ngJmhLliNkhQ<6>diPciPbiO<3>ZiO`iOaiObkS<3>bhKb\
gIbfGbfEbeCbdA`e8<20>u_8v_8w_8xZ8yZ8<3>zY8zY8zY8zY8<\
7>zfOzgQzhS<2>zkYzm`zl_<23>lYDkXCjXB<2>iV8hU7jT6kR4<\
16>RgPQhQPiR<3>KmWEpY<17>ZgX`fXafX<3>edXicXkeXifXheX\
fdXecUcbLg_D<8>OjQMkRJmT<2>DpXBqY7u_9vZ<3>HwXJwXLwW<\
2>RwVZwJ<7>Jw7
}
frm:MandelbrotMix4 {; Jim Muth
a=real(p1), b=imag(p1), d=real(p2), f=imag(p2),
g=1/f, h=1/d, j=1/(f-b), z=(-a*b*g*h)^j,
k=real(p3)+1, l=imag(p3)+100, c=fn1(pixel):
z=k*((a*(z^b))+(d*(z^f)))+c,
|z| < l
}
END 20.0 PAR-FORMULA FILE==================================
|
times.
