Mathematica绘制函数图像—极坐标绘图( 三 )




10        把“三叶草”画当作绿色:
PolarPlot[1 + Cos[3 x] + 1.5 Sin[3 x]^2, {x, 0, 2 Pi}, 
 PlotStyle -> {Green, Thickness[0.05]}, PlotRange -> All]
        还挺标致的!

Mathematica绘制函数图像—极坐标绘图



11        用PlotRange聚焦特定的区域来查看图形 。
        以“蝴蝶”曲线为例 , 用列表的体例查看分歧的角度:
Table[PolarPlot[Exp[Cos[x]] - 2 Cos[4 x] + Sin[x/12]^5, {x, 0, 20 Pi},
   PlotStyle -> {Red, Thickness[0.001]}, 
  PlotRange -> q], {q, {10, 3.9, 1, 0.1}}]
        运行成果如下:

Mathematica绘制函数图像—极坐标绘图



Mathematica绘制函数图像—极坐标绘图



Mathematica绘制函数图像—极坐标绘图



Mathematica绘制函数图像—极坐标绘图



Mathematica绘制函数图像—极坐标绘图



12用ColorFunction对“蝴蝶”曲线的分歧点加上分歧颜色!代码如下:
PolarPlot[Exp[Cos[x]] - 2 Cos[4 x] + Sin[x/12]^5, {x, 0, 20 Pi}, 
 PlotStyle -> Thick, ColorFunction -> Function[{x, y, t, r}, Hue[x]]

Mathematica绘制函数图像—极坐标绘图



注重事项本来 , 百度经验不会缩小500×500像素的图形 。

以上内容就是Mathematica绘制函数图像—极坐标绘图的内容啦 , 希望对你有所帮助哦!

猜你喜欢