Mathematica函数作图.docVIP

Mathematica函数作图 Mathematica具有强大的作图功能，它可以进行数据作图、函数作图、参数作图以及隐函数作图等等，程序与格式如以下各例所示。 平面函数图形 例1 平面函数图形。例如，在区间 [ 0，2Pi ] 中画 Sin[x] 的图像。命令及格式如下： Plot[ Sin[ x ], { x, 0, 2Pi } ] 得到结果： 图1 为平面图形加刻度框。程序如下： Plot[ Sin[ x ], { x, 0, 2Pi }, Frame -True ] 得到结果： 图2 为图形加背景颜色。例如绿色，程序如下： Plot[ Sin[ x ],{ x, 0, 2Pi }, Background -RGBColor[0, 1, 1] ] 得到结果： 图3 例2 平面函数图形。例如，在区间 [-10，10 ] 中画 的图像。命令及格式如下： Plot[, { x, -10, 10 } ] 得到结果： 图4 例3 平面函数图形。例如，在区间 [-10，10 ] 中画Sin[x]/x的图像。命令及格式如下：Plot[Sin[x]/x,{x,-10,10}] 得到结果： 图5 例4 平面函数图形。例如，在区间 [ 0，10 ] 中画函数的图像。命令及格式如下：Plot[Log[10,x]-Sin[x],{x,0,10}] 得到结果： 图6 空间函数图形 例5 空间函数图形。例如，在区间画函数的图像。命令及格式如下： Plot3D[ Sin[ x*y ], { x, 0, 2Pi }, { y, 0, 2Pi } ] 得到结果： 图7 参数函数图形 例6 平面参数函数图形。画圆： ParametricPlot[{Cos[x],Sin[x]},{x,0,2Pi}] 得到结果（图形按1：0.618的比例显示）： 图8 若要屏幕显示实际比例的图形，输入以下程序： ParametricPlot[{Cos[x],Sin[x]},{x,0,2Pi}, AspectRatio-Automatic] 程序运行后，得到结果： 图9 例7 平面参数函数图形。画心脏线： 心脏线（Cardioid）的方程为 ，其极坐标方程为。 （1）用参数作图法画心脏线的图形，程序如下： r = 2; ParametricPlot[{2r(1–Cos[x])Cos[x], 2r(1–Cos[x])Sin[x]}, {x,0,2Pi}] ParametricPlot[{2r(1–Cos[x])Cos[x], 2r(1–Cos[x])Sin[x]}, {x,0,2Pi}, AspectRatio-Automatic] 图形如下： 图10 图11 （2）用极坐标作图法画心脏线的图形，程序如下： 第一步 打开子程序软件包 Graphics`Graphics` 第二步 执行以下程序即可： r=2; PolarPlot[ 2r*( 1 – Cos[ t ] ), { t, 0, 2Pi } ] 例8 空间参数函数图形。 ParametricPlot3D[{Cos[x],Sin[x],x},{x,0,2Pi}]//Timing 执行后，机器显示画图时间与图形。结果如下： 图12 例9 空间参数函数图形 ParametricPlot3D[{u*Cos[u]*Cos[v],u*Cos[u]*Sin[v],Tan[u]},{u,0,2Pi},{v,0,2Pi}] 结果如下： 图13 隐函数图形 例10 隐函数图形。输入程序（注意，方程有两个等号） 第一步 Graphics`ImplicitPlot` 第二步 ImplicitPlot[ x2 +2 y2 == 3 , { x, -2, 2 } ] 得到结果如下： 图14 例11 隐函数图形。输入程序（注意，方程有两个等号）： ImplicitPlot[ Sin[ 2x ] + Cos[ 3y ] == 1 , { x, -2Pi, 2Pi }, { y, -2Pi, 2Pi }, PlotPoints - 30 ] 其中，PlotPoints - 30的意思是作图时使用30个样本点。 得到结果如下： 图15 例12 隐函数图形。 ImplicitPlot[ { ( x2 + y2 )2 == x2 – y2 , ( x2 + y2 )2 == 2x*y }, { x, -2, 2 }, PlotStyle - { GrayLevel[ 0 ], Dashing[ { 0.03} ] } ] 执行程序，得到两个曲线合并的图形（图16）