用Mathematica绘制随机的雪花图案

1、给出平面上五个随机的点：a = RandomReal[{-1, 1}, {5, 2}]这五个点可以连成一个五边形。

3、从六边形的顶点{0,0.1}出发，累加六边形的顶点坐标：c = Accumulate[b]

5、翻转d：e = Reverse[d.{{-1, 0}, {0, 1}}]这类似于关于y轴的对称变换。

7、合并d和f的顶点，得到一个11边形：g = Join[d, f]

9、这样，可以整合一个雪花函数。

11、下面是100个雪花。