榕坚

有了一点认识，有趣：

榕坚

总算完成了这一个图形：

榕坚

191# xuefeiyang
这肯定也是经过某种变换后得到的结果，变换式是什么呢？一直做不出来：

榕坚

198# 分形几何


191#的还是没办法得到，

榕坚

柳老师说的没错，可变的参数非常多。变一下就有一个新花样，因此说一个简单的M集也不怕被人全部扫完了：

下载 (77.05 KB)

2010-6-20 17:49

榕坚

UF中的carr系列一直不敢问津，今天试作一个虽然不成功但感觉也不错：
Carr3527(YAXIS) {
; Updated for UF2 by Erik Reckase, February 2000
                  ; Modified Sylvie Gallet frm.
init:
  pixel2=-abs(real(pixel))+flip(imag(pixel)), op = pixel2^3
  b3a=.1+|.018/pixel2|, b2=op*cabs(pixel2+.125)^4
  b2a=b2^2+.004/pixel2, b3=b2a+|op|*b2*pixel2/2+b3a
  b3c=abs(b3^2.85)/flip(.035/pixel2)
  z=b3c-flip(.035/pixel2)^3.9-.005/pixel2+.068124
  zmod = (-.748823289672,-.1350036189)
  l1 = round(real(p1)),l2 = round(imag(p1))
  l3 = round(real(p2)),l4 = round(imag(p2))
  float bailout=16,int iter=0, float zro=0
loop:
  IF ((iter == l1) || (iter==l2) || (iter==l3) || (iter==l4))
    z = z*zro
  ENDIF
  z=z^2+zmod
  iter=iter+1
bailout:
  |z|<=bailout
default:
  title = "Carr 3527"
  periodicity = 0
  maxiter = 700
  magn = 1.5
  center = (0,0)
  method = multipass
  param p1
    caption = "Iter Limits 1,2"
    default = (200,300)
    hint = "0< Re(P1) < Im(P1) < Re(P2) < Im(P2) <maxiter \
            for best results"
  endparam
  param p2
    caption = "Iter Limits 3,4"
    default = (400,550)
    hint = "0< Re(P1) < Im(P1) < Re(P2) < Im(P2) <maxiter \
            for best results"
  endparam
}

榕坚

试一下把逃逸区都用等势线来画：

下载 (103.72 KB)

2010-8-8 19:04

榕坚

UF的色彩真是好：

榕坚

Z^3+C放大：

榕坚

211# xiaongxp


找的地方还不够好，不够对称。高次的广义M集中这种缠绕的曲线很多。但要得到理想的图形比较困难。