在网上看到别人用Mathematica画了一个精美的“龙形”分形图案,深感奇妙。于是,我用网络画板也来画了一个类似的分形。下面,我就介绍一下具体步骤。
工具/原料
1
电脑
2
网络画板
方法/步骤
1
绘制线段AB,设AB的中点为C。
2
以AB为直径作半圆,D是半圆上的动点。
3
隐藏点C和半圆。
4
进行迭代变换,规则是:(A,B)对应(A,D)、(B,D);只保留非点类图形;只保留最终迭代;迭代深度为12。
5
Mathematica绘制出来的下图的迭代深度是20,这在网络画板里面几乎不可能实现,因为网络画板会卡掉。
6
网络画板的迭代图,是可手动控制的。当我们拖动点D的时候,整个迭代图形都会发生变化。
注意事项
Mathematica也可以控制分形的变化,只不过需要把动点变成Locator,代码比较复杂。
上一篇:怎么画水墨龙