1、完整的Mandelbrot分形如下。MandelbrotSetPlot[{}, ColorFunction -> "Rainbow", Frame -> False]
2、绘制一定范围内的Mandelbrot分形。MandelbrotSetPlot[-0.5615 + 0.6436 I + {-1 - I, 1 + I},ColorFunction -> "Rainbow", Frame -> False]
3、在Mathematica里面的图片上敲击鼠标右键,有一个获取坐标的选项。
4、获取某个点的坐标。
5、以上面选中的点为中心,查看局部放大的图片。MandelbrotSetPlot[-0.5599 + 0.6356 I + {-1 - I, 1 + I}/10,ColorFunction -> "Rainbow", Frame -> False]
6、减少迭代次数,图像就不再那么细致了:MandelbrotSetPlot[-0.5599 + 0.6356 I + {-1 - I, 1 + I}/10,ColorFuncti泠贾高框on -> "Rainbow", MaxIterations -> 36, Frame -> False]
7、增加迭代次数:MandelbrotSetPlot[-0.5599 + 0.6356 I + {-1 - I, 1 + I}/10,ColorFunction -> "Rainbow", MaxIterations -> 365, Frame -> False]
8、再放大10倍:MandelbrotSetPlot[-0.5599 + 0.6356 I + {-1 - I, 1 + I}/100,ColorFunction -> "Rainbow", MaxIterations -> 365, Frame -> False]
9、再放大10倍:MandelbrotSetPlot[-0.5599 + 0.6356 I + {-1 - I, 1 + I}/1000,ColorFunction -> "Rainbow", MaxIterations -> 365, Frame -> False]
10、放大10000倍的效果图:MandelbrotSetPlot[-0.5599 + 0.6356 I + {-1 - I, 1 + I}/10000,ColorFu荏鱿胫协nction -> "Rainbow", MaxIterations -> 365, Frame -> False]
11、这个放大过程,可以制作成为动画。Manipulate[MandelbrotSetPlot[-0.5599 + 0.6356 I + {-1 - I, 1 + I}/10^n, ColorFunction -> "Rainbow", MaxIterations -> 365, Frame -> False], {n, 0, 4, 0.1}]
12、另一个局部放大的动画:Manipulate[MandelbrotSetPlot[-0.5572 + 0.6355 I + {-1 - I, 1 + I}/10^n, ColorFunction -> "Rainbow", MaxIterations -> 365, Frame -> False], {n, 0, 5, 0.1}]