本文，我们来学习一下，洋人是怎么作复变函数的图像的。这里的代码，都是模仿洋人的代码改写的。
2、注意，ColorFunctionScaling -> False是必不可少的，取消渐变色，防止整个图形的颜色过于笼统。复数图0[f_, {xmin_,xmax_},{ymin_,ymax_},选项:OptionsPattern[]]:= RegionPlot[True, {x,xmin,xmax},{y, ymin, ymax},选项, PlotPoints ->100,ColorFunction ->Function[{x, y},With[{ff=f[x+I y]}, Hue[(2. Pi)^-1 Mod[Arg[ff],2 Pi],1,1 -(1.2 +10 Log[Abs[ff]+1])^-1]]]]
2、如果把Log[x]的实部和虚部，视为某条曲线的参数方程，试画出这条曲线。ParametricPlot[{Re@Log[x],Im@Log[x]}, {x, -0.5,0.5}, PlotRange -> All]
2、Gamma函数的立体图：立体复数图[Gamma[z],{z,-5-3.65I,5+3.65I}]
4、Sin[z]+z^n，当n从1增到7，看看立体复数图有什么变化：Export["000fushutu.gif",Table[立体复数图[Sin[z]+z^n,{z,-5 Pi-3.65I Pi,5 Pi+3.65I Pi},ImageSize->{500,365}],{n,1,7,1/6}],"AnimationRepetitions"->Infinity,"DisplayDurations"->1]
