inRm3D: 画板论坛 - Powered by Discuz! Board

标题: 征解一复分形 [打印本页]

作者: 柳烟 时间: 2016-8-12 20:45 标题: 征解一复分形

20160812Newton {
;
; Standard Newton fractal.
;
init:
  z = pixel
loop:
  zold = z
  z =z-((z^2+@c)^13+1)/(13*(z^2+@c)^12)
bailout:
  |z - zold| >= @bailout
default:
  title = "Newton"
  helpfile = "Uf*.chm"
  helptopic = "Html\formulas\standard\newton.html"
$IFDEF VER50
  rating = recommended
$ENDIF
  maxiter = 100

  param c
caption = "c"
default = (8.319999991,3.086666667)
hint = "Specifies the root of the equation that is solved. Use larger \
         numbers for slower convergence."
  endparam
  param bailout
caption = "Bailout value"
default = 0.00001
min = 0
$IFDEF VER40
exponential = true
$ENDIF
hint = "This parameter defines how soon a convergent orbit bails out while \
         iterating. Smaller values give more precise results but usually \
         require more iterations."
  endparam
}

作者: 柳烟 时间: 2016-8-12 20:47

UF中的效果是：

其局部放大效果：

我用画板整，整了几次，搞了老半天，整出的图相去甚远。

图片附件: 20160812N.png (2016-8-12 20:47, 98.49 KB) / 下载次数 934
http://inrm3d.cn/attachment.php?aid=24945&k=07be47a8d20ca3798a5812cd886bdee0&t=1714070964&sid=O7hNg2

图片附件: 34.png (2016-8-12 20:51, 98.43 KB) / 下载次数 982
http://inrm3d.cn/attachment.php?aid=24946&k=aae9781eb99ba60852fecba779491c1f&t=1714070964&sid=O7hNg2

作者: lnszdzg100 时间: 2016-12-3 16:15

c在1.5+0.2i附近也挺美的！

图片附件: 20161203001.PNG (2016-12-3 16:14, 133.51 KB) / 下载次数 963
http://inrm3d.cn/attachment.php?aid=25108&k=8e5a616501b9606c8d8bcbf36c0ed702&t=1714070964&sid=O7hNg2

图片附件: 20161203002.PNG (2016-12-3 16:14, 145 KB) / 下载次数 965
http://inrm3d.cn/attachment.php?aid=25109&k=7ea5c0de5cee8bb2ec6d9249572e8331&t=1714070964&sid=O7hNg2

图片附件: 20161203004.PNG (2016-12-3 16:14, 71.56 KB) / 下载次数 954
http://inrm3d.cn/attachment.php?aid=25110&k=2b60c94b5bf0600c2a68f32117c12c16&t=1714070964&sid=O7hNg2

欢迎光临 inRm3D: 画板论坛 (http://inrm3d.cn/)