Uf中的分形

changxde

下载 (27.03 KB)

2010-11-30 17:59

changxde

两个简短的Uf小程序：
cha001{
init:
  z=pixel  ,c=0
loop:
  c=(1-c)*real(sqrt(c))/5+z*.75
  z=z*z+c
bailout:
  |z| <= 4
default:
  periodicity = 0
  maxiter = 100
  magn = 1
  center = (-.4,0)
  method = multipass
}

下载 (17.34 KB)

2010-11-30 18:00

cha002{
init:
  z=pixel  ,c=0
loop:
  z=z*z+c
  c=(1-c)*real(sqrt(c))/5+z*.75
bailout:
  |z| <= 4
default:
periodicity = 0
}

下载 (17.19 KB)

2010-11-30 18:00

changxde

4# 榕坚
这两个是carr1403的变形，名字是随便摁的。

changxde

3#程序的画板工具

下载 (13.53 KB)

2010-12-7 12:45

下载 (17.43 KB)

2010-12-7 12:45

下载 (14.18 KB)

2010-12-7 12:45

下载 (31.52 KB)

2010-12-7 12:48

changxde

根据carr1434，1435改编的两个Uf小程序

Cha009 {
init:
  z=(1-pixel)^3, c=(-0.7456,0.212)
loop:
  z=z*z+c
  z=z+c/4
bailout:
  |z| <=4
default:
  title = "Cha009"
  periodicity = 0
  maxiter = 500
  magn = 1
  center = (1,0)
  method = multipass
}

下载 (31.55 KB)

2010-12-7 12:50

Cha010 {
init:
  z=(1-pixel)^4, c=(-0.7456,0.212)
loop:
  z=z+c/5
  z=z*z+c

bailout:
  |z| <=4
default:
  title = "Cha010"
  periodicity = 0
  maxiter = 500
  magn = 1
  center = (1,0)
  method = multipass
}

下载 (32.13 KB)

2010-12-7 12:50

changxde

8# 榕坚
看看源文件，它的前100次是M集，然后在M集内做400次的J集。
下图不是Uf的方法，而是采用叠加的方法，

下载 (48.94 KB)

2010-12-2 16:59

changxde

下载 (32.13 KB)

2010-12-7 12:39

changxde

9# 榕坚
10# 柳烟
现象原因分析：
由于Uf中有循环跳出功能，在M集前100次迭代中，某点如果坚持不到最后，中间就退出循环，接下来的J集迭代它就不参与了，所以Uf图形外围就干净。但在Gsp中，没有循环跳出功能，对每一点都要坚持，实在坚持不住，记p=0再坚持直到循环结束。在M集前100次迭代中，某点如果坚持不到最后就是p=0，当M迭代结束，开始J集迭代时，算法改变了，原来p=0的点有些就复活，变成p=1，对et又有贡献了，所以GSP图形外围就出现了一些图形。
解决方法：
1）增大阈值使其改变算法时也不能复活；
2）改进算法使其一旦死亡就不能复活。

changxde

求助大家，
我做Carr1968在系统坐标系下做好后，扫描一切正常，但做成工具再扫描里面的J集发生了变化，请大家找找原因。
正常图形:

下载 (46.92 KB)

2010-12-4 16:59

不正常图形:

下载 (28.4 KB)

2010-12-7 12:40

changxde

我又试了试，工具还是不行