返回列表 回复 发帖
我几乎天天都想看看画板论坛,看看各位老师,可我最近有点懒,也没有新的东西与大家分享,就很少...。
231# changxde
好久不见,问好changxde.以前你张帖在此坛的东西,至今仍受益,感谢。别说,此坛少了老兄,还真感觉缺了一大块。
分区块造复分形,是UF中的惯用技俩之一。以前机械按UF代码走,知其然不知其所以然,在与向老师的交流中受到启发,象哥赫雪花谢氏三角形等,代码已经不神秘,可说已经破解。按原理走,不一定非得按UF代码一步一趋,照样造出一致的图来。
1.gif
按上面草图,将大等边三角形三顶点处的小圆相似变换成大圆,用内迭代法,再整一个逃逸半径进行缩放,就会得到#227带等势圈的谢氏三角形。
New.gif
用的是前面内迭代法。
UF文件破解谢尔三角形.gsp (15.61 KB)
gnd-slope-sierpinski2 {
init:
  z1 = #pixel
loop:
  IF ((imag(z1)>=sqrt(3)/3*real(z1)) && (-sqrt(3)/3*real(z1)<=imag(z1)))
    z1 = 2*z1-1i
  ELSEIF (real(z1)<=0)
    z1 = 2*z1+0.5*sqrt(3)+0.5*1i
  ELSEIF (real(z1)>0)
    z1 = 2*z1-0.5*sqrt(3)+0.5*1i
  ENDIF
bailout:
  |z1| <@bailout
default:
  title = "Slope Sierpinski Triangle II"
  center = (0.0, 0.0)
  magn = 1.1538
  maxiter = 149
  method = multipass
  periodicity = 0

  param bailout
    caption = "Bailout value"
    default = 127
    min = 1
  endparam
}
1.jpg
谢尔宾斯基三角形20150121.gsp (14.96 KB)
UF中原作是直角三角形,我用其法在等边三角形中整。附所有草图:
无标题.png
New.gif
连扫谢氏三角.gsp (11.24 KB)
捕获201501192.PNG 捕获201501193.PNG 1.gif 2.gif 3.gif 4.gif
今天整理文件,发现的几个
迭代和旋转进行“一体化”设计,文件可以作得很小。分形简直就是复杂与简单的矛盾统一体!
5.gif
谢氏三角[环连扫].gsp (10 KB)
如何给谢氏地毯整点等势圈?搞了老半天,无果。
7.jpg

6.jpg (30 KB)

6.jpg

返回列表