Welcome to Fractal Forums

Fractal Software => 3D Fractal Generation => Topic started by: trafassel on December 13, 2010, 07:43:50 PM




Title: minScale0NegMandelbox
Post by: trafassel on December 13, 2010, 07:43:50 PM
Scale=-1.03


Title: Re: minScale0NegMandelbox
Post by: trafassel on December 13, 2010, 07:51:30 PM
Scale=-1.001
Iterations=37000


Title: Re: minScale0NegMandelbox
Post by: trafassel on December 13, 2010, 07:55:01 PM
Scale=-1.001
Iterations=37000, again


Title: Re: minScale0NegMandelbox
Post by: trafassel on December 13, 2010, 08:47:45 PM
A look behind the curtain.


Title: Re: minScale0NegMandelbox
Post by: Tglad on December 13, 2010, 11:26:59 PM
http://orbittrap.ca/?p=1980 (http://orbittrap.ca/?p=1980)


Title: Re: minScale0NegMandelbox
Post by: trafassel on January 15, 2011, 03:39:36 PM
(Infinite?) Mandelbox Spiral

http://www.youtube.com/watch?v=3vo5JzwNZ8k


Title: Re: minScale0NegMandelbox
Post by: trafassel on January 19, 2011, 10:37:57 PM
In the scale 1.1 Mandelbox with the additional x=|x| condition, I found an attractor garden.



Title: Re: minScale0NegMandelbox
Post by: trafassel on January 21, 2011, 09:32:51 PM
A path


Title: Re: minScale0NegMandelbox
Post by: trafassel on January 24, 2011, 07:43:05 AM
Zoom in the last picture


Title: Re: minScale0NegMandelbox
Post by: trafassel on January 26, 2011, 08:27:21 PM
Zoom in the last scene with low (170) and high (370) iterations.


Title: Re: minScale0NegMandelbox
Post by: trafassel on January 26, 2011, 08:34:26 PM
The road to infinity.



Title: Re: minScale0NegMandelbox
Post by: trafassel on February 27, 2011, 03:47:27 AM
And here is an owl, sitting inside the positive scale mandelbox (scale=1.04))


Title: Re: minScale0NegMandelbox
Post by: trafassel on February 28, 2011, 10:07:20 PM
The area around the attractors in the Mandelbox with scale=1.04 and minScale=0 looks similar to the negative Mandelbox.




Title: Re: minScale0NegMandelbox
Post by: DarkBeam on March 01, 2011, 10:36:19 PM
A fractal that contains every other fractal! :) This is what I call amazing!


Title: Re: minScale0NegMandelbox
Post by: bib on March 01, 2011, 10:53:55 PM
A fractal that contains every other fractal! :) This is what I call amazing!

Have you seen this very well done summary? http://www.miqel.com/fractals_math_patterns/mandelbox_3d_fractal.html


Title: Re: minScale0NegMandelbox
Post by: DarkBeam on March 01, 2011, 11:57:10 PM
A fractal that contains every other fractal! :) This is what I call amazing!

Have you seen this very well done summary? http://www.miqel.com/fractals_math_patterns/mandelbox_3d_fractal.html

I am really speechless! The mbox is really an infinite universe, how many years it will take to explore it ...? :D


Title: Re: minScale0NegMandelbox
Post by: bib on March 02, 2011, 12:17:39 AM
A fractal that contains every other fractal! :) This is what I call amazing!

Have you seen this very well done summary? http://www.miqel.com/fractals_math_patterns/mandelbox_3d_fractal.html

I am really speechless! The mbox is really an infinite universe, how many years it will take to explore it ...? :D

Now maybe you understand why your formulae do not get as much attention as you expect, there is already so much to explore just in the Mandelbox :o ;)


Title: Re: minScale0NegMandelbox
Post by: trafassel on March 03, 2011, 09:56:17 PM
A fractal that contains every other fractal! :) This is what I call amazing!

Not every fractal. One is still missing :-)


Title: Re: minScale0NegMandelbox
Post by: trafassel on March 03, 2011, 10:34:55 PM
Two other spots in the scale 1.04 Mandelbox.


Title: Re: minScale0NegMandelbox
Post by: trafassel on March 06, 2011, 11:11:05 PM
The monster and the net.


Title: Re: minScale0NegMandelbox
Post by: trafassel on April 18, 2011, 10:19:31 PM
another world.


Title: Re: minScale0NegMandelbox
Post by: trafassel on April 24, 2011, 01:28:49 AM
And again, there is so much to explore.


Title: Re: minScale0NegMandelbox
Post by: trafassel on April 25, 2011, 12:16:24 PM
The house of my grandmother.


Title: Re: minScale0NegMandelbox
Post by: trafassel on April 28, 2011, 01:23:16 AM
Is not here.

Which way to go?



Title: Re: minScale0NegMandelbox
Post by: trafassel on April 29, 2011, 05:33:43 PM
But in the box, most of the ways ends at a wall.


Title: Re: minScale0NegMandelbox
Post by: trafassel on June 07, 2011, 10:59:17 PM
Negative scaling variant of the AbsBox, described in:
http://www.fractalforums.com/new-theories-and-research/mandelbox-variant-21/

Very "bulby" surface details, but some new structures.



Title: Re: minScale0NegMandelbox
Post by: msltoe on June 14, 2011, 02:37:58 AM
trafassel,

 Surprisingly, the following is nothing more than an inverted Mandelbox (your invention) with

 params: scale=1, fold @ 0.5, and minr = 0. seed = 0,-4,0. found by dainbramage.

It seems to look like a Riemann sphere fractal.

(http://nocache-nocookies.digitalgott.com/gallery/7/803_14_06_11_2_32_47.jpeg)

-mike


Title: Re: minScale0NegMandelbox
Post by: trafassel on June 15, 2011, 07:12:20 PM
Beautiful image, msltoe.

What is fold @ 0.5?



Title: Re: minScale0NegMandelbox
Post by: msltoe on June 16, 2011, 01:50:09 AM
Thanks. I didn't know at first from Jesse's parameters, but trying it out on my code, Fold:0.5 means "if (x>0.5) x=1-x", etc. instead of the usual if (x>1)...


Title: Re: minScale0NegMandelbox
Post by: trafassel on June 18, 2011, 01:03:37 AM
Very interesting formula, but I cannot reproduce it. With scale=1 I just just got spheres with center at (0,0,0).   :-(



Title: Re: minScale0NegMandelbox
Post by: msltoe on June 18, 2011, 03:30:08 PM
Trafassel,

 The main parameters are very unique so far, I can't seem to reproduce the shapes with alternate numbers.

  a=0;c=0.5;b=-3;
  while ((norm<48)&&(iter<imax)) {

   if (x<-0.5) {x=-1-x;} else {if (x>0.5) {x=1-x;}}
   if (y<-0.5) {y=-1-y;} else {if (y>0.5) {y=1-y;}}
   if (z<-0.5) {z=-1-z;} else {if (z>0.5) {z=1-z;}}

   r=x*x+y*y+z*z;
   if (r>1.0 ) {r = 1.0;}
   r = 1/r;
   x *= r;
   y *= r;
   z *= r;
    x = x+a; y = y+b; z = z+c;

   norm = x*x+y*y+z*z;
   
   iter++;
 }

view box:

    st[0].xstart = -0.5; st[0].xstop = +0.5;
    st[0].ystart = -3.1; st[0].ystop = -2.1; 
    st[0].zstart = -3; st[0].zstop = +1; 

rotate around x axis 45-90 degrees.
also, I put a cutting plane at z=0 after rotation.

-mike


Title: Re: minScale0NegMandelbox
Post by: trafassel on June 19, 2011, 01:29:37 AM
Thank you very much, Mike for sharing your parameters.

In my experiences all scale=1 julia sets are very fragile, corresponding the max iteration value. I was able to create an fractal shape with scale=1, but if I increase imax, the shape moves into dusk.



Title: Re: minScale0NegMandelbox
Post by: trafassel on June 19, 2011, 04:09:04 PM
It works:

Two scenes with norm=48 and norm=12  (in my Formula: bailout value gr).

And scale=1!!!

// Gestaltlupe 1.1 Formula with initialisation
// 1. Start Gestaltlupe
// 2. Select Tab Formula
// 3. Replace formula text with this whole text
// 4. Press Preview two times:
//      1. to set the parameters
//      2. to preview the rendering


public override void Init() {base.Init();
if(GetString("intern.Formula.TempUpdateVal")!="71bcef12b3fd03d2bde0dc7b1b98a86c"){
SetParameterBulk(@"<Entry
Key='Border.Max.x' Value='-2.6589457308563' /><Entry
Key='Border.Max.y' Value='3.45711283860699' /><Entry
Key='Border.Max.z' Value='0.564950190451428' /><Entry
Key='Border.Max.zz' Value='0' /><Entry
Key='Border.Min.x' Value='-3.36127769244752' /><Entry
Key='Border.Min.y' Value='2.75478087701577' /><Entry
Key='Border.Min.z' Value='-0.137381771139796' /><Entry
Key='Border.Min.zz' Value='0' /><Entry
Key='Formula.Static.Cycles' Value='2' /><Entry
Key='Formula.Static.Formula' Value='-2' /><Entry
Key='Formula.Static.jx' Value='0.01' /><Entry
Key='Formula.Static.jy' Value='0.0' /><Entry
Key='Formula.Static.jz' Value='0' /><Entry
Key='Formula.Static.jzz' Value='0' /><Entry
Key='Formula.Static.MinCycle' Value='200' /><Entry
Key='Transformation.Camera.AngleX' Value='10' /><Entry
Key='Transformation.Camera.AngleY' Value='0' /><Entry
Key='Transformation.Camera.AngleZ' Value='20' /><Entry
Key='Transformation.Perspective.Cameraposition' Value='0.5' /><Entry
Key='View.Height' Value='1200' /><Entry
Key='View.Perspective' Value='1' /><Entry
Key='View.Width' Value='1200' /><Entry
Key='intern.Formula.TempUpdateVal' Value='71bcef12b3fd03d2bde0dc7b1b98a86c' />
");
}additionalPointInfo=new AdditionalPointInfo();}

public override long InSet(double ar, double ai, double aj, double br, double bi,
double bj, double bk, long zkl, bool invers) { double gr=48; double xx, yy, zz;
long tw; int n; double x=ar,y=ai,z=aj; double r_n = 0; xx = x * x; yy = y * y;
zz = z * z; tw = 0L; double r = Math.Sqrt(xx + yy + zz); double scale = 1.0;
additionalPointInfo.red=0; additionalPointInfo.green=0; additionalPointInfo.blue=0;
for (n = 1; n < zkl; n++) {
if (x > 0.5) x = 1.0 - x; else if (x < -0.5) x = -1.0 - x; if (y > 0.5) y = 1.0 - y;
else if (y < -0.5) y = -1.0 - y; if (z > 0.5) z = 1.0 - z; else if (z < -0.5) z = -1.0 - z;
xx=x*x;yy=y*y;zz=z*z; double length= r = xx + yy + zz; if(r!=0) { additionalPointInfo.red+=xx/r;
additionalPointInfo.green+=yy/r; additionalPointInfo.blue+=zz/r; } if (length > gr) {
tw = n; break; } double mult=1; if (length < 1 && length>0)
{ mult=1.0/(length); } mult*=scale; x*=mult; y*=mult; z*=mult;/* x+=br;
y+=bi; z+=bj;*/ x+=0; y+=0.5; z+=-3; }if (invers) {if (tw == 0) tw = 1; else tw = 0; }
return (tw); }


Title: Re: minScale0NegMandelbox
Post by: msltoe on June 19, 2011, 06:31:05 PM
trafassel: Glad you got it to work. It raises lots of questions, such as

1) Are there other parameters that produce similar results but requires less camera finesse.
2) Can we introduce spirals?
3) Can we get a higher density of bulbs (through higher symmetry polyhedra) to make Romanesco-like fractals?
4) Does this bulbous discovery (originally found by Theli-at on deviantArt) re-awaken the possibility of a holy grail or is this as good as it gets?

-mike


Title: Re: minScale0NegMandelbox
Post by: trafassel on June 21, 2011, 10:58:05 PM
Mike,
I think, some of your questions are connected with the shape of the "ideal" Mandelbox with very high bailout, very hight number of iterations and scale = 1. The best we can do first, is to find a good shape approximation (I think, scale=1.001 is another type of approximation) which need less computing time.

Here is a Julia of your formula with seed (0,0,-3.14) and a cut plane at y=0.



Title: Re: minScale0NegMandelbox
Post by: trafassel on August 04, 2011, 11:03:36 PM
Back to another world. Here I found the others and myself.


Title: Re: minScale0NegMandelbox
Post by: trafassel on August 06, 2011, 01:00:26 PM
The more pictures of the Mandelbox, which is introduced in Reply #20 .


Title: Re: minScale0NegMandelbox
Post by: trafassel on August 06, 2011, 01:42:15 PM
Vegetation


Title: Re: minScale0NegMandelbox
Post by: Buddhi on August 07, 2011, 07:57:13 PM
Trafassel,

 The main parameters are very unique so far, I can't seem to reproduce the shapes with alternate numbers.

  a=0;c=0.5;b=-3;
  while ((norm<48)&&(iter<imax)) {

   if (x<-0.5) {x=-1-x;} else {if (x>0.5) {x=1-x;}}
   if (y<-0.5) {y=-1-y;} else {if (y>0.5) {y=1-y;}}
   if (z<-0.5) {z=-1-z;} else {if (z>0.5) {z=1-z;}}

   r=x*x+y*y+z*z;
   if (r>1.0 ) {r = 1.0;}
   r = 1/r;
   x *= r;
   y *= r;
   z *= r;
    x = x+a; y = y+b; z = z+c;

   norm = x*x+y*y+z*z;
   
   iter++;
 }

view box:

    st[0].xstart = -0.5; st[0].xstop = +0.5;
    st[0].ystart = -3.1; st[0].ystop = -2.1; 
    st[0].zstart = -3; st[0].zstop = +1; 

rotate around x axis 45-90 degrees.
also, I put a cutting plane at z=0 after rotation.

-mike

I'm trying to reproduce this formula (in Mandelbulber program) but unfortunatelly it not working for me  :'(
Bellow there is code which I used. Please look what is wrong with it. I tried with many different intersections, but always got nothing. Maybe something is missed.

z is the iterated vector (z.x, z.y, z.z)
Code:
for(int i=0; i < maxiter; i++)
{
if (z.x<-0.5) {z.x=-1-z.x;} else {if (z.x>0.5) {z.x=1-z.x;}}
if (z.y<-0.5) {z.y=-1-z.y;} else {if (z.y>0.5) {z.y=1-z.y;}}
if (z.z<-0.5) {z.z=-1-z.z;} else {if (z.z>0.5) {z.z=1-z.z;}}
r = z.x * z.x + z.y * z.y + z.z * z.z;
if (r > 1.0) {r = 1.0;}
r = 1.0/r;
z *= r;
z.x += 0;
z.y += 0.5;
z.z += -3.0;
r = z.Length();
if(r > 48) break;
}

Thank you in advance for :help:


Title: Re: minScale0NegMandelbox
Post by: KRAFTWERK on August 08, 2011, 10:47:18 AM
It works:

Two scenes with norm=48 and norm=12  (in my Formula: bailout value gr).

And scale=1!!!

...


Those images looks sooo Holy Grail:ish!!!  Nice ones Trafassel!


Title: Re: minScale0NegMandelbox
Post by: msltoe on August 08, 2011, 05:17:29 PM
Buddhi,

  The density has to be inverted. If the function escapes , it is solid and vice-versa.
  The number of iterations should be fairly high : 30-50.
  Finally, the structures are hiding inside the solid, near y=0.

-mike
 


Title: Re: minScale0NegMandelbox
Post by: trafassel on August 08, 2011, 07:30:48 PM
Buddhi,

The difference between your formula and mine is the handling of the bailout value.

I test the bailout before sphere folding and I use r=z.x*z.x+z.y*z.y+z.z*z.z.

You has the additional line:

r = z.Length();
if(r > 48) break;

Which got the Square Root of r (so you exit the Main loop, if r>=48*48). The shape is very fragile at higher bailout value - it should be there, but very very dusty.

Hope this helps (Additional to the remarks of msltoe)

Per


Title: Re: minScale0NegMandelbox
Post by: trafassel on August 11, 2011, 11:35:44 PM
Some sketches


Title: Re: minScale0NegMandelbox
Post by: trafassel on August 15, 2011, 10:58:43 PM
Central station and the opera.


Title: Re: minScale0NegMandelbox
Post by: trafassel on September 13, 2011, 09:39:08 PM
A video of the Reply #20 Mandelbox variant. It shows the honeycomb area.

http://www.youtube.com/watch?v=amPt2xL5mHw