返回列表 回复 发帖

(z^2-Q^2)(z^2-c^2)系列分形

前几天,老师们完了(z-1)(z+1)(z-b+a)(z-b-a) 的牛迭M集征解(越玩越有趣)
今天,在Mathcad中也实现了这个,而且发现:这一系列的结构是相似的,可以统一在一个分形之中。
1.jpg
2015-1-28 21:49
2.jpg
2015-1-28 21:49
3.jpg
2015-1-28 21:49
4.jpg
2015-1-28 21:49
6.jpg
2015-1-28 21:49
5.jpg
2015-1-28 21:49
7.jpg
2015-1-28 21:49
a.jpg
2015-1-28 21:50
8.jpg
2015-1-28 21:49
9.jpg
2015-1-28 21:49
而且,还有一些很有意思的变种

b.jpg
2015-1-28 22:01

c.jpg
2015-1-28 22:01

d.jpg
2015-1-28 22:01




应剑客之约,让我邀请大家到Mathcad吧做客。
希望几位老师能到Mathcad吧看看
http://tieba.baidu.com/f?kw=mathcad&fr=ala0
e.jpg
2015-1-28 22:03

UF变种
f.jpg
2015-1-28 22:04
g.jpg
2015-1-28 22:04
h.jpg
2015-1-28 22:04
3.jpg
2015-1-28 22:44
杜老兄越玩越高超,快入化境了,祝贺。
捕获201501291.PNG
2015-1-29 15:52

也是变种
UF代码,很简单,却很有效哈
Newton_Mandelbrot1 {
init:
  complex Q = @Q
  int p = @power
  c = #pixel
  z = sqrt((Q^2+c^p)/6 )
oop:
  err = (z^4-(c^p+Q^2)*z^2+c^p)/(4*z^3-2*(c^p+Q^2)*z)
  z = z - err
bailout:
  |err| > @bailout
default:
  title = "Newton_Mandelbrot1"
  maxiter = 2000
  periodicity = 0
  center = (0,0)
  magn = 1.0
param power
    caption = "power"
    default = 1
  endparam
  param Q
    caption = "Q"
    default = (1.0,0.0)
  endparam
param bailout
    caption = "Bailout"
    default = 0.000001
endparam
}
“蝴蝶结”的个数有p确定,如果增加变换,得到的图形也很美。
邀请大家到Mathcad吧做客。
http://tieba.baidu.com/f?kw=mathcad&fr=ala0
返回列表