返回列表 回复 发帖
虽然简单,但却是UF循环体的好范例。练一个,顺便问一下,怎么我找遍了UF也没找着这两个分形的名称:

cha002-3.JPG (24.38 KB)

cha002-3.JPG

试试这个UF的分形,我怎么做了几遍都与原图不大一致:
Carr1968 {
; Updated for UF2 by Erik Reckase, March 2000
           ; Modified Sylvie Gallet frm.
init:
  z=c=pixel
  int compt=0, int limit=round(real(p1)), float bailout=4  
loop:
  IF (compt>=limit)
    c = (-.7259,.205999)
  ENDIF
  z=z*z+c
  compt=compt+1
bailout:
  |z|<=bailout
default:
  title = "Carr 1968"
  periodicity = 0
  maxiter = 500
  magn = 1.4
  center = (0,0)
  method = multipass
  param p1
    caption = "Iter Limit"
    default = (100,0)
    hint = "The real part of this parameter signals a change \
            in the value of c. The imaginary part is not used."
  endparam
}

Fractal1.jpg (59.56 KB)

Fractal1.jpg

这是我做的结果,莫名其妙的多了一些东西:

捕获.JPG (31.16 KB)

捕获.JPG

10# 柳烟


加大#bailout的值确实可以起到作用:

carr 1968'-1.JPG (51.33 KB)

carr 1968'-1.JPG

14# 柳烟


取p1=500应为纯M集。
33# xuefeiyang


这个carr 3202我做的结果与你一样,但与UF的结果有差别。估计要改一下算法:

Carr3202(YAXIS)'.JPG (67.5 KB)

Carr3202(YAXIS)'.JPG

Fractal1.jpg (53.03 KB)

Fractal1.jpg

37# 柳烟


修改了一下:

捕获.JPG (35.85 KB)

捕获.JPG

问题文件.gsp (66.75 KB)

39# 柳烟
中间还有一个大红的圆环不知道原因出在哪。
42# changxde


真漂亮!
45# 柳烟


是哪一个工具造成的?计算函数的吗?
返回列表