怎么样用mathematica画图Julia Set的图像?
Julia Set见http://www.mcgoodwin.net/julia/juliajewels.html Some Julia sets
http://www.ijon.de/mathe/julia/some_julia_sets_1_en.html Clear["Global`*"]; (*Clear all variables*)
z=0; (*迭代的初始值*)
c=0.3+0.6*I; (*公式中的常数*)
m=200; (*迭代次数*)
data=Table; (*定义绘图数据的形状,矩阵*)
Do[z=z^2+c; (*迭代公式*)
data[]=Re; (*实数部分赋值给第一列*)
data[]=Im, (*虚数部分赋值给第二列*)
{n,1,m}]; (*循环控制*)
ListLinePlot (*绘图*)
为什么我的这个命令就是不行呢?Clear["Global`*"]; (*Clear all variables*)
z=0; (*迭代的初始值*)
c=0.3+0.6*I; (*公式中的常数*)
m=200; (*迭代次数*)
data=Table; (*定义绘图数据的形状,矩阵*)
Do[z=z^2+c; (*迭代公式*)
data[]=Re; (*实数部分赋值给第一列*)
data[]=Im, (*虚数部分赋值给第二列*)
{n,1,m}]; (*循环控制*)
ListLinePlot (*绘图*)
还是写在代码框里面好
页:
[1]