榕坚

100# 柳烟


我的理解把它当做et。

柳烟

我又干了两个钟点了,居然中间一大片白区域.我现在将原代码中的开关项去掉,原代码精简为:
dmj-Lyapunov {

init:
  float sum = 1
  float v = 0
loop:
    v = cabs(#z)
    sum = sum * (abs(2*v))

final:
  sum = log(sum)
  sum = -sum
  #index = sum/#numiter
default:
  title = "Lyapunov"
  helpfile = "dmj-pub\dmj-pub-uf-lyapunov.htm"

  param smooth
    caption = "Smooth Coloring"
    default = false
    hint = "If set, results will be 'smoothed' to hide iteration bands."
  endparam
}
我基本上是按此代码造的.我通过UF验证了,这代码能产生帖图图形.再干两个钟点再说,看能不能造出这图形.这个图算是将我折腾够呛.

柳烟

怎么扫出的乌龟肚中毛毛燥燥的？

下载 (138.84 KB)

2012-4-3 15:08

柳烟

从早晨８点到下午５点，已经绞尽脑汗了，徒劳无功，只能得到上楼结果，前前后后算起来，有半月之久了，已经泄气了．我将今日文件发在此，大家看看是何原因，将我从苦闷的泥淖中拯救出来，非常感激．
研究特效.gsp (16.02 KB)

下载次数: 2092

2012-4-3 17:28

changxde

看了102#的精简代码，觉得和前面三角形法比较像，简单修改一下UF—TIA那个文件感觉还可以，仅供参考。

下载 (126.21 KB)

2012-4-3 17:47

柳烟

感谢常老师帮忙解决问题，下了你的文件，略略看了看，又翻看了此坛榕坚兄的类似文件，发现我在解读代码时，犯了一个错误，可能那是症结所在，我正在重新作．问好常老师，你扫出的图漂亮，无论是数学修为，还是画板技术，我一向非常景仰，再次问好．

柳烟

在ＵＦ中，当迭代为1000时,每个小乌龟中间的数值逸出区域会扩大.中间那块便是,见图:

下载 (86.79 KB)

2012-4-3 21:39

我用画板按新受启发造,基本造出来了,但是迭代次数才100,中间的数值逸出比UF还要厉害,不明原因,正在查找.这是迭代100时的情形:

下载 (171.83 KB)

2012-4-3 21:44

我尝试补洞,老半天没辙.应该说我造法没错,可能UF经过其自身处理.我按常老师发表的文件中的参数造,还不错.

柳烟

扫一个图:

下载 (83.04 KB)

2012-4-3 22:47

柳烟

整一个UF中的着色文件,代码基本采自常老师的文件,我将代码放在这,大家可将其复制粘帖,保存为后缀名为ucl的文件,保存在UF中的文件夹下,随时调用即可用.
dmj-Lyapunov {

init:
  float sum = 0
  float v = 0
loop:
    v = cabs(#z)
    sum = sum +log(v)

final:
  #index = -1*sum/#numiter
default:
  title = "Lyapunov"
  helpfile = "dmj-pub\dmj-pub-uf-lyapunov.htm"

  param smooth
    caption = "Smooth Coloring"
    default = false
    hint = "If set, results will be 'smoothed' to hide iteration bands."
  endparam
}
扫一个图:

下载 (187.04 KB)

2012-4-3 23:18

柳烟

100# 柳烟


我的理解把它当做et。
榕坚 发表于 2012-4-3 08:03

谢谢,实践证明完全正确.