返回列表 回复 发帖
二位老师的作品作得太好了,下载下来,慢慢领悟。
我作f(z)=1/((.15+.15i)z^5+z^3+(-3+3i)z),按向老师的法子调色,结果弄出的猫迷这副样子,两位老师看看,问题在何处?问好。
未命名2.JPG
未命名1.gsp (17.41 KB)
f(z)=(Az^m+B)(Cz^m+D) 的J集.gsp (42.07 KB)
28NM图片1.jpg

528NM图片2.JPG (23.04 KB)

528NM图片2.JPG

11# xiaongxp
我弄了四遍,每次力图小心翼翼,结果每次弄出的图,不是这空白,就是那空白,或增加迭代次数后,原不是空白的,成空白。可能头脑不听指挥。谢谢向老师帮忙找原因。
f(z)=(z3-z)(dz2+1)J集系列
5311.JPG
5312.JPG
5313.JPG
f(z)=(z3-z)(dz2+1)J集系列.gsp (76.6 KB)
这几天干复变分形,我感觉到纳闷的一点是,当我拿对数对迭代Z的终点的模进行着色时,发现用 ln(zo)着色后,扫出的图有些空白,图不正常,但当我改用ln(ZO+1)时,就一切正常。上楼也是这样的。但是向老师着色中,用ln(ZO),确无事。什么原因呢?
f(z)=z4/(z8+d) mitd=0,01, dargestellt auf [-1,4;1,4]x[-1,4;1,4
未命名.JPG
f(z)=z4除(z8+d)J集.gsp (16.43 KB)
39# xiaongxp
经向老师这一说,懂了。谢。
今天我弄榕坚推荐的软件中的这一范例,整出的图怪怪的,大家帮忙想想办法。原软件中的程序英文,由于我底子差,有些地方可猜出一二,有些地方不懂,如读天书。榕老师、梅老师英文棒。我把此摆在这公众出入多的地方:
原程序如下:
N_sin_M {
; newton's method applied to f(z) = sin(z) - c
; Q(z) = z - f(z)/f'(z) = z - ((sin(z)-c)/cos(z))

global:
   
init:
  z = 0
  complex delta_z = 0
  complex c = #pixel
  bool continue = true
  
loop:
  delta_z = ( sin(z) - c ) / cos(z)
  
  if |delta_z| < @delta
    continue = false
    if @zmode=="step"
        z = delta_z
    endif ; zmode
  else
    z = z - delta_z
  endif ; < @delta
  
bailout:
; -- this isn't the bailout but the continuing condition
;    false = bail; true = continue
  continue
  
default:
  title = "Newton-M, sin(z)-c" ; [v1.0]
  magn = 0.25
  periodicity = 0
  
  heading
    caption = "Bailout"
  endheading
  float param delta
    caption="Bailout delta"
    hint="Square of max step. Use small values."
    default=1e-8
    min=0
  endparam
  param zmode
    caption = "final z"
    enum = "z" "step"
    default = 1
  endparam
  
switch:
  type = "N_sin_J"
  cv = #pixel
  delta = delta
  zmode = zmode
  
}
制成的效果如下:
Fractal4.jpg
图片看起来很夺人眼球的。我抵挡不住诱惑,一直在弄,均以失败告终。按牛顿迭代f(z) = sin(z) - c
; Q(z) = z - f(z)/f'(z) = z - ((sin(z)-c)/cos(z))的M集。谁先整出,请及时公开源文件。
51# mjj_ljh
我昨天按老兄的网址去跑了一通,大开眼界,谢。此建议我一百个同意,并支持。
返回列表