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

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

作者: 柳烟 时间: 2013-12-1 22:40 标题: 复分形调色征解

复分形20131201.gsp (26.34 KB)
这个分形是我稍稍改了UF中的代码，制作的。调色始终是本人的软肋，至今仍整不好，大家集思广益，帮忙想想法子，将颜色调的清楚些。如何将链子突出，或者将等势圈突出，或者两者都突出，对比分明？大家实践看看。我这文件中的et——逃逸时间，Zx.Zy是迭代终点坐标。究竟作色有那些决窍？em,et如何摆弄？我调一个色要老半天，才整得把适。

图片附件: o.jpg (2015-1-24 19:18, 41.75 KB) / 下载次数 1595
http://www.inrm3d.cn/attachment.php?aid=20678&k=ffc9f4e57dcd2ae5b86b24fa2c99ec14&t=1716239162&sid=SYyBc8

附件: 复分形20131201.gsp (2013-12-1 22:40, 26.34 KB) / 下载次数 3058
http://www.inrm3d.cn/attachment.php?aid=20679&k=2afa9b8e817de1b3811a41e8d615f55a&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-1 22:43

附上两张Uf中代码扫出的图片：
[attach]20680[/attach]

图片附件: p.jpg (2015-1-24 19:19, 80.75 KB) / 下载次数 1784
http://www.inrm3d.cn/attachment.php?aid=20681&k=8ebd3e6b8dc4b05a59c7a34c8ac6e31d&t=1716239162&sid=SYyBc8

作者: 榕坚 时间: 2013-12-2 10:56

要想突显链条，可以试试HSV着色。

作者: 柳烟 时间: 2013-12-2 14:17

将就１楼作色参数，照上楼建议，改成ＨＳＶ作色后，扫得一图，似有突出链条效果：

图片附件: q.jpg (2015-1-24 19:20, 36.23 KB) / 下载次数 1608
http://www.inrm3d.cn/attachment.php?aid=20682&k=77e587983bc963a3a75ac6df8801481b&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-2 14:33

改文件中的rgb为0.42381，扫出一图，感觉到链子与势圈对照较为分明点了：

图片附件: r.jpg (2015-1-24 19:21, 40.06 KB) / 下载次数 1601
http://www.inrm3d.cn/attachment.php?aid=20683&k=0cdb64c094668f3db3932394d043d4b6&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-2 14:54

rgb=0.23631,R-G-B分别为：rgb*et的0.06、0.08、0.19倍，扫出一图，觉得味道有点特别，特发出：

图片附件: s.jpg (2015-1-24 19:21, 47.1 KB) / 下载次数 1712
http://www.inrm3d.cn/attachment.php?aid=20684&k=93d1f3cca38c68e5b2bb7dce82bc2192&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-2 19:55

rgb=0.36131，Ｒ：rgb乘根号下(0.5et)、G:rgb根号下(0.8et)、B:rgb·根号下(0.5et).

rgb=0.27201，扫了一个图，觉得还有点意思。可惜再亮点就行了，或惜目前没招

没有事，乱摸乱撞，看看能否作色有些什么规律。

图片附件: t.jpg (2015-1-24 19:25, 35.81 KB) / 下载次数 1630
http://www.inrm3d.cn/attachment.php?aid=20687&k=c6fb036d0baffc89e5a07bdcb6b5247b&t=1716239162&sid=SYyBc8

图片附件: u.jpg (2015-1-24 19:25, 30.2 KB) / 下载次数 1578
http://www.inrm3d.cn/attachment.php?aid=20688&k=cba1111bf75fc7de1bfccfa555617663&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-2 20:59

图片附件: v.jpg (2015-1-24 19:26, 32.09 KB) / 下载次数 1620
http://www.inrm3d.cn/attachment.php?aid=20689&k=f90a2c5222b2c39e2aa1d4902b2fa55b&t=1716239162&sid=SYyBc8

图片附件: w.jpg (2015-1-24 19:26, 36.59 KB) / 下载次数 1594
http://www.inrm3d.cn/attachment.php?aid=20690&k=3fa1315303378e7671d4d2bed44f95ee&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-2 21:22

我调色总是跟着感觉走，所以耗费很多光阴。

图片附件: x.jpg (2015-1-24 19:27, 38.9 KB) / 下载次数 1577
http://www.inrm3d.cn/attachment.php?aid=20691&k=4472e554a86f02383a09aea79dbbac13&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-7 14:23

图片附件: y.jpg (2015-1-24 19:27, 15.26 KB) / 下载次数 1605
http://www.inrm3d.cn/attachment.php?aid=20727&k=4a74d279df00ac871b04dfce375588e5&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-7 15:45

刚才我又将上楼图与ＵＦ进行了对照，发现黑鸟龟位置还有点问题！

作者: 柳烟 时间: 2013-12-7 15:57

找到原因了，原来是第三个乌龟的参数3.375代成了3.75,耗费了我大半天的光阴。不过，倒是明白了作机理，整个七八个乌龟都不成问题。此分形原来作过，由于ＧＳＰ分形作的不断进步，原作法烦顼，加载不便等原因，现按计算法重新作。

Carr1997(20131207).gsp (17.95 KB)

图片附件: i.jpg (2015-1-24 19:13, 15.67 KB) / 下载次数 867
http://www.inrm3d.cn/attachment.php?aid=20729&k=929a96b535601ca05238a4765d5f41bb&t=1716239162&sid=SYyBc8

附件: Carr1997(20131207).gsp (2013-12-8 10:30, 17.95 KB) / 下载次数 2137
http://www.inrm3d.cn/attachment.php?aid=20742&k=aa7e7ee52ebead3971e7e4717ffa3a79&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-7 16:31

问题又来了，将程序中的P1,P2设置为0按程序运行结果，应只有一个正宗Ｍ集。ＵＦ正常，而画板扫出的图不正常。需要完善。还有，ＵＦ程序与ＧＳＰ不完全相同，在解读程序时，ＧＳＰ作了适度的变通。
将就上楼文件，动点手脚，扫得如下图：

图片附件: j.jpg (2015-1-24 19:14, 26.76 KB) / 下载次数 866
http://www.inrm3d.cn/attachment.php?aid=20743&k=3b96396e9b44a9942d0beca071ad98e8&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-9 09:45

最近尝试ＨＳＶ调色，看来效果还可以。

图片附件: k.jpg (2015-1-24 19:15, 18.01 KB) / 下载次数 853
http://www.inrm3d.cn/attachment.php?aid=20777&k=122a29f1677bb8a2555933c3ed58649b&t=1716239162&sid=SYyBc8

作者: 榕坚 时间: 2013-12-9 19:46

13# 柳烟
我昨天重做时更出现了一个难解的问题左半段都对，后面出现了一个小M集而且是反向的。到现在还一直弄不明白原因。

作者: 柳烟 时间: 2013-12-9 20:26

此分形，我重作时，干了一夜，也是出现奇奇怪怪的，不明原因，又去调看了原来的视频，用计算法重新作，也不行。第二天中午才试成。现在又不能发图片，不知你作的是怎么个样。我将前楼文件的作重新作了个视频，以备遗忘。我现在将其放入百度盘，你查查原因。
Ｃarr1997的视频制作

作者: 柳烟 时间: 2013-12-17 16:50

另类科赫雪花曲线

Circly Koch Curve(20131217).gsp (20.33 KB)

图片附件: 未命名.jpg (2013-12-17 20:14, 36 KB) / 下载次数 900
http://www.inrm3d.cn/attachment.php?aid=20771&k=73b08346be0c3f6325917f6200ce0d11&t=1716239162&sid=SYyBc8

图片附件: 未命名.jpg (2013-12-17 20:15, 39.28 KB) / 下载次数 847
http://www.inrm3d.cn/attachment.php?aid=20772&k=85016565ac7e7fe0a9f42ecf91ef7536&t=1716239162&sid=SYyBc8

附件: Circly Koch Curve(20131217).gsp (2013-12-18 10:24, 20.33 KB) / 下载次数 2171
http://www.inrm3d.cn/attachment.php?aid=20776&k=351d2a9ac31960d27557d9bc2b481a04&t=1716239162&sid=SYyBc8

作者: xiaongxp 时间: 2013-12-17 21:13

复分形雪花

图片附件: l.jpg (2015-1-24 19:16, 22.37 KB) / 下载次数 1189
http://www.inrm3d.cn/attachment.php?aid=20775&k=64a5596634576634070d76fba01fc081&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-18 10:51

扫2个回路希尔伯特印章：

图片附件: m.jpg (2015-1-24 19:17, 37.95 KB) / 下载次数 840
http://www.inrm3d.cn/attachment.php?aid=20778&k=7261a57a0512dbe772c996f4fb09bf1a&t=1716239162&sid=SYyBc8

图片附件: n.jpg (2015-1-24 19:17, 33.5 KB) / 下载次数 858
http://www.inrm3d.cn/attachment.php?aid=20779&k=37848a642aeb3c1203c29c1f3ec9e65a&t=1716239162&sid=SYyBc8

作者: xiaongxp 时间: 2013-12-18 16:02

19# 柳烟
第一幅横就横直就直的，而且画面干净，漂亮！

作者: 榕坚 时间: 2013-12-18 18:54

17# 柳烟

如果把圆加光照效果变成一个个球将更好看。

作者: 柳烟 时间: 2013-12-18 19:31

21# 榕坚
很好的意见，但如何技术上实现呢？大家可探索。

作者: changxde 时间: 2013-12-20 19:03

17# 柳烟

如果把圆加光照效果变成一个个球将更好看。
榕坚发表于 2013-12-18 18:54

可以用UF的着色试试

作者: changxde 时间: 2013-12-20 19:45

图片附件: d.jpg (2015-1-24 19:11, 47.13 KB) / 下载次数 1001
http://www.inrm3d.cn/attachment.php?aid=20789&k=59824ca42cf042ffe0abfd3c9ab94704&t=1716239162&sid=SYyBc8

图片附件: e.jpg (2015-1-24 19:11, 11.8 KB) / 下载次数 989
http://www.inrm3d.cn/attachment.php?aid=20790&k=b7722084af53c9dcd34a965b622b3652&t=1716239162&sid=SYyBc8

图片附件: f.jpg (2015-1-24 19:11, 22.38 KB) / 下载次数 1031
http://www.inrm3d.cn/attachment.php?aid=20791&k=192ebbc21ac5d4cb10354e7c2ce05b45&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-22 16:31

图片附件: 未命名.jpg (2013-12-22 17:11, 72.94 KB) / 下载次数 1166
http://www.inrm3d.cn/attachment.php?aid=20815&k=6d424eed845e495bd370a6dbc6080b54&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-22 19:42

图片附件: g.jpg (2015-1-24 19:12, 21.86 KB) / 下载次数 1006
http://www.inrm3d.cn/attachment.php?aid=20816&k=ef49ecd89366810fdce6f969f77cf74d&t=1716239162&sid=SYyBc8

作者: 榕坚 时间: 2013-12-22 21:34

突飞猛进的感觉。

作者: 柳烟 时间: 2013-12-22 23:31

将原来单圆环陷阱往这个分形上套，改变环带中心线半径为0,环带宽度设为1即得单球陷阱。
再扫一个七色的。

图片附件: Fractal1.jpg (2013-12-23 12:51, 38.43 KB) / 下载次数 1004
http://www.inrm3d.cn/attachment.php?aid=20817&k=c001b729fe4fbaac702cce834de21fc3&t=1716239162&sid=SYyBc8

图片附件: 未命名.jpg (2013-12-23 12:51, 34.42 KB) / 下载次数 1028
http://www.inrm3d.cn/attachment.php?aid=20818&k=b07faff7d1aeb3cb69a26ee107b98f32&t=1716239162&sid=SYyBc8

作者: xiaongxp 时间: 2013-12-22 23:34

28# 柳烟
漂亮！

作者: 柳烟 时间: 2013-12-22 23:51

图片附件: h.jpg (2015-1-24 19:12, 15.32 KB) / 下载次数 1029
http://www.inrm3d.cn/attachment.php?aid=20819&k=49513b0a6d277b9216129d39b496a615&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-23 12:40

好久没搞陷阱了，乘此举趣，扫一幅；

图片附件: 4.jpg (2015-1-24 18:54, 28.63 KB) / 下载次数 652
http://www.inrm3d.cn/attachment.php?aid=20822&k=2b3caf3950a1cdfdc1352528319465ab&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-24 23:54

图片附件: 5.jpg (2015-1-24 19:00, 36.83 KB) / 下载次数 700
http://www.inrm3d.cn/attachment.php?aid=20832&k=eceb30f89502b4ed1d5231b2b0052cf4&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-26 00:03

图片附件: 6.jpg (2015-1-24 19:01, 21.31 KB) / 下载次数 702
http://www.inrm3d.cn/attachment.php?aid=20835&k=aac1435176a7ba5981b852c9a067ee2f&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-26 00:15

N陷阱：

图片附件: 7.jpg (2015-1-24 19:02, 23.85 KB) / 下载次数 697
http://www.inrm3d.cn/attachment.php?aid=20836&k=486f2faaa833ef313f6ab3a673f12a9b&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-26 11:32

UF中效果，用画板实现起来难。

图片附件: 8.jpg (2015-1-24 19:03, 65.96 KB) / 下载次数 738
http://www.inrm3d.cn/attachment.php?aid=20837&k=0d5f508290cd02dbe80f81299617fd5c&t=1716239162&sid=SYyBc8

作者: xiaongxp 时间: 2013-12-26 15:13

35# 柳烟
用“两次迭代+串行叠加”法，不太难

图片附件: 9.jpg (2015-1-24 19:04, 22.17 KB) / 下载次数 915
http://www.inrm3d.cn/attachment.php?aid=20839&k=39bbc396333590480af35a09592693b3&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-26 23:13

图片附件: a.jpg (2015-1-24 19:04, 19.7 KB) / 下载次数 652
http://www.inrm3d.cn/attachment.php?aid=20841&k=5d4a96fb2ef0ac1afebd9f2ef15b81d5&t=1716239162&sid=SYyBc8

作者: xiaongxp 时间: 2013-12-27 16:41

36# xiaongxp
不同的填充方式

图片附件: 1.gif (2015-1-24 19:06, 18.61 KB) / 下载次数 920
http://www.inrm3d.cn/attachment.php?aid=20842&k=76d5ce7482da4c059bb2f230cfca40a8&t=1716239162&sid=SYyBc8

图片附件: 2.gif (2015-1-24 19:06, 23.79 KB) / 下载次数 929
http://www.inrm3d.cn/attachment.php?aid=20844&k=0b78087345a6095b2e5e535845c16145&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-27 17:19

用ＧＳＰ造复分形以复分形作陷阱很不理想，比如Ｍ集以Ｍ集为陷阱，或牛集掉入Ｍ集陷阱，与ＵＦ比，天壤之别，有无妙法？我思索了好久，不成正果。

作者: 柳烟 时间: 2013-12-30 23:45

图片附件: b.jpg (2015-1-24 19:06, 28.44 KB) / 下载次数 682
http://www.inrm3d.cn/attachment.php?aid=20878&k=8cec90a8e0df9045cc7abf0bbe715bb1&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2013-12-31 09:46

图片附件: 3.jpg (2015-1-24 18:53, 16.46 KB) / 下载次数 1192
http://www.inrm3d.cn/attachment.php?aid=20879&k=8b7aac0e5a7e05d715e68b888f840be2&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2014-1-1 23:37

图片附件: 1.jpg (2015-1-24 18:52, 19.82 KB) / 下载次数 1303
http://www.inrm3d.cn/attachment.php?aid=20886&k=fb1e43a8dc23a547e2537f51e494e946&t=1716239162&sid=SYyBc8

图片附件: 2.jpg (2015-1-24 18:52, 23.67 KB) / 下载次数 1322
http://www.inrm3d.cn/attachment.php?aid=20888&k=504d78ef6978146439944fc6a873b6fd&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2014-1-2 09:34

我的ＵＦ作品：

图片附件: 7.jpg (2015-1-24 00:14, 24.59 KB) / 下载次数 1297
http://www.inrm3d.cn/attachment.php?aid=20887&k=89fef9f544698b5a62033af53711e02a&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2014-1-2 10:24

Slope Sierpinski Triangle II(20140102).gsp (21.78 KB)

图片附件: 6.jpg (2015-1-24 00:14, 20.13 KB) / 下载次数 1318
http://www.inrm3d.cn/attachment.php?aid=20889&k=4c7e1c05d4aa821328594d7b5e767d82&t=1716239162&sid=SYyBc8

附件: Slope Sierpinski Triangle II(20140102).gsp (2014-1-2 10:24, 21.78 KB) / 下载次数 2600
http://www.inrm3d.cn/attachment.php?aid=20890&k=dccfd99da4eda205a58205276c055e31&t=1716239162&sid=SYyBc8

作者: 榕坚 时间: 2014-1-2 10:28

几何画板也不错，就是速度跟不上：

图片附件: 5.jpg (2015-1-24 00:13, 25.47 KB) / 下载次数 1249
http://www.inrm3d.cn/attachment.php?aid=20891&k=4ea4b31692c58b5fef768b28fe066175&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2014-1-2 10:33

45# 榕坚
请问榕老师，画板造时，Ｍ集的等势圈将谢尔宾斯基陷阱遮住，如何处理？这个问题困挠了好久，我就是将Ｍ集用光滑作色也不能解决问题。

作者: 榕坚 时间: 2014-1-2 11:06

46# 柳烟

颜色调整尽量淡化掉等势圈。

作者: 柳烟 时间: 2014-1-2 11:20

47# 榕坚
淡化掉怕不成，因为等势圈遮住了谢尔宾斯基陷阱。我以前就弄过，弄来弄去，就象是ＵＦ中的这个效果：

如果加大阈值，将完全遮住作为陷阱的谢尔宾斯基三角形。

图片附件: 4.jpg (2015-1-24 00:13, 30.1 KB) / 下载次数 1334
http://www.inrm3d.cn/attachment.php?aid=20892&k=aad5a07d30cb3372927e516ce22ab3a8&t=1716239162&sid=SYyBc8

作者: 榕坚 时间: 2014-1-2 21:04

48# 柳烟

上图中我只用了et判断M集内部着黑色，其它地方与et无关。可以参考一下UF中
mt-sierpinski-trap {
; Mark Townsend, 15 Oct 1999
;
; iteration trap inserted by red williams 17 November 1999
;
init:
  trap_z = 0
  int iter = 0
  int frm_iter = 0
  int trap_iter = 0
  float dist = 0
  float min_dist = 1e30
  int res = 0
  int lowtrap = abs(round(real(@itrap) * #maxiter))
  int hightrap = abs(round(imag(@itrap) * #maxiter))
  if lowtrap > hightrap
res = lowtrap
lowtrap = hightrap
hightrap = res
  endif
loop:
  w = (#z + @start) / (@scale + flip(@scale))
; Iterate the Sierpinski formula
  frm_iter = 0
  while frm_iter < @max_iterations
if (imag(w) > 0.5)
   w = @a * real(w) + flip(@a * imag(w) -1)
elseif (real(w) > 0.5)
   w = @a * real(w) -1 + flip(@a * imag(w))
else
   w = @a * real(w) + flip(@a * imag(w))
endif
frm_iter = frm_iter + 1
  endwhile
  dist = cabs(@fn1(w))
  if dist < min_dist
min_dist = dist
trap_z = #z
trap_iter = iter
  endif
  iter = iter + 1
final:
  if @coloring == 0
#index = 0.001 * min_dist
  elseif @coloring == 1
#index = cabs(trap_z)
  elseif @coloring == 2
#index = 0.01 * trap_iter
  elseif @coloring == 3
#index = abs(real(trap_z))
  elseif @coloring == 4
#index = abs(imag(trap_z))
  elseif @coloring == 5
float a = atan2(trap_z)
if a < 0
   a = a + 2 * #pi
endif
a = 1 / (2 * #pi) * a
#index = a
  endif
  if !((#numiter >= lowtrap) && (#numiter <= hightrap))
if @opt == 1
   #solid = true
endif
  elseif (#numiter >= lowtrap) && (#numiter <= hightrap)
if @opt == 0
   #solid = true
endif
  endif
default:
  title = "Sierpinski Trap"
  param coloring
caption = "Coloring"
enum = "Distance" "Magnitude" "Iteration" "Real" "Imag" "Angle"
  endparam
  param a
caption = "Parameter"
default = 2.0
  endparam
  param max_iterations
caption = "Iterations"
default = 10
  endparam
  param start
caption = "Offset"
default = (0,0)
  endparam
  param @scale
caption = "Scale"
default = 1.0
  endparam
  param itrap
caption = "Iter. trap limits"
hint = "Between 0.0 and 1.0 (fraction of Maximum Iterations).\
         Real part is lower boundary of trap and Imaginary \
         part, the upper boundary.  Pixels between these limits \
         are colored according to Solid/Normal Choice."
default = (0.0,1.0)
  endparam
  param opt
caption = "Iter. trap mode"
enum = "Solid" "Normal"
default = 1
  endparam
  func fn1
caption = "Function"
default = ident()
  endfunc
}
用 dist着色

作者: 柳烟 时间: 2014-1-8 10:57

Ｊ集一个.gsp (18.59 KB)
这个Ｊ集造出埃舍儿盘一定好看，可惜，造不出。

图片附件: 3.jpg (2015-1-24 00:12, 26.03 KB) / 下载次数 1298
http://www.inrm3d.cn/attachment.php?aid=20999&k=f8f518a850bebe47b833e50bfc6300b2&t=1716239162&sid=SYyBc8

附件: Ｊ集一个.gsp (2014-1-8 10:57, 18.59 KB) / 下载次数 2551
http://www.inrm3d.cn/attachment.php?aid=21000&k=f8945f8199352b0d755ae32516e023cb&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2014-1-8 11:43

图片附件: 1.jpg (2015-1-24 00:10, 29.31 KB) / 下载次数 1140
http://www.inrm3d.cn/attachment.php?aid=21001&k=495644b88330b40fcdeac6ee2a1ada80&t=1716239162&sid=SYyBc8

作者: 柳烟 时间: 2015-1-24 00:03

图片附件: 2.jpg (2015-1-24 00:10, 22.19 KB) / 下载次数 1157
http://www.inrm3d.cn/attachment.php?aid=23557&k=9dbd0ce663a271c0636808f1371786b0&t=1716239162&sid=SYyBc8

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