返回列表 回复 发帖
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验证了,这代码能产生帖图图形.再干两个钟点再说,看能不能造出这图形.这个图算是将我折腾够呛.
怎么扫出的乌龟肚中毛毛燥燥的?
未命名.jpg
从早晨8点到下午5点,已经绞尽脑汗了,徒劳无功,只能得到上楼结果,前前后后算起来,有半月之久了,已经泄气了.我将今日文件发在此,大家看看是何原因,将我从苦闷的泥淖中拯救出来,非常感激.
研究特效.gsp (16.02 KB)
看了102#的精简代码,觉得和前面三角形法比较像,简单修改一下UF—TIA那个文件感觉还可以,仅供参考。
m55.jpg

UF-Lyapunov .gsp (26.78 KB)

感谢常老师帮忙解决问题,下了你的文件,略略看了看,又翻看了此坛榕坚兄的类似文件,发现我在解读代码时,犯了一个错误,可能那是症结所在,我正在重新作.问好常老师,你扫出的图漂亮,无论是数学修为,还是画板技术,我一向非常景仰,再次问好.
在UF中,当迭代为1000时,每个小乌龟中间的数值逸出区域会扩大.中间那块便是,见图:
2.png
我用画板按新受启发造,基本造出来了,但是迭代次数才100,中间的数值逸出比UF还要厉害,不明原因,正在查找.这是迭代100时的情形:
未命名.jpg
我尝试补洞,老半天没辙.应该说我造法没错,可能UF经过其自身处理.我按常老师发表的文件中的参数造,还不错.
扫一个图:
未命名.jpg
整一个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
}
扫一个图:
Fractal1.jpg
100# 柳烟


我的理解把它当做et。
榕坚 发表于 2012-4-3 08:03
谢谢,实践证明完全正确.
返回列表