返回列表 回复 发帖
18# 柳烟


是它的M集(对C着色)。
22# 柳烟

捕获.JPG (57.53 KB)

捕获.JPG

做了个变换Z--1/Z
32# 柳烟


应该是一样的,你把bailout的值改变一下看看(减小或增大)。

N_exp_J-1.JPG (84.53 KB)

N_exp_J-1.JPG

N_exp_J-2.JPG (82.79 KB)

N_exp_J-2.JPG

34# 柳烟


你不是按UF做的,改变bailout的值好象不起作用。我加了一个限制条件:

捕获.JPG (37.57 KB)

捕获.JPG

e^z-1的N集(未迭代).gsp (14.2 KB)

莫名其妙,做了四次四个结果不尽相同:

N_exp_J'-2.JPG (44.44 KB)

N_exp_J'-2.JPG

40# 柳烟


我做了两次,都是这个结果:

捕获.JPG (24.61 KB)

捕获.JPG

43# 柳烟


这个色彩过渡的好。
这个分形太奇怪了,我已经做了UF中重做次数最多的一个:

33.JPG (17.09 KB)

33.JPG

46# 柳烟


这里有一个当型循环,几何画板该怎么处理呢。巷老师用内部挖空的办法可能可以办到。
改一下代码,结果是一样的:
mt-attractor-julia {
; Mark Townsend, 29 Mar 1999
;
; Julia sets that bail out when the orbit reaches
; (hopefully) a periodic attractor. I iterate the
; critical point z = (0,0) before the main loop
; and test against the resulting value. In the
; hope of speeding the process up I include
; the option to give up the search when z
; grows too large.
;
init:
  w = @c
  z = #pixel
loop:
  z = z^2 + @c  
bailout:
  |w - z| > @epsilon && |z| < @bailout
default:
  title = "Attractor Julia"
  maxiter = 1000
  periodicity = 0
  param c
    caption = "Julia seed"
    default = (-0.12,0.74)
  endparam
  param epsilon
    caption = "Epsilon"
    default = 1e-6
    hint = "This is the bailout value for convergent orbits."
  endparam
  param bailout
    caption = "Bailout value"
    default = 100.0
    hint = "This is the bailout value for divergent orbits."
  endparam
  param max
    caption = "Search maxiter"
    default = 100
    hint = "The is the maxiter value for the attractor \
           search."
  endparam  
  param no_bail
    caption = "Every pixel"
    default = false
    hint = "This determines whether to bailout of the attractor \
           search when z grows too large. Enable this when the \
           image is mainly inside."
  endparam  
switch:
  type = "mt-attractor-m"
  max = max
  epsilon = epsilon
  bailout = bailout
  no_bail = no_bail
}

1.JPG (36.09 KB)

1.JPG

返回列表