空间曲线曲面的绘制.docVIP

空间曲线与曲面的绘制 本实验的目的是:利用数学软件Mathematica绘制三维图形来观察空间曲线和空间曲面图形的特点，以加强几何的直观性。 1.空间曲线的绘制 绘制空间曲线时一般使用曲线的参数方程，利用命令“ParametricPlot3D”。如画出参数方程 SKIPIF 1 0 所确定的空间曲线的命令格式为: ParametricPlot3D[{x[t],y[t],z[t]},{t,tmin,tmax},选项] 画出旋转抛物面 SKIPIF 1 0 与上半球面 SKIPIF 1 0 交线的图形。 解：它们的交线为平面 SKIPIF 1 0 上的圆 SKIPIF 1 0 ，化为参数方程为 SKIPIF 1 0 ，下面的mathematica命令就是作出它们的交线并把它存在变量p中： 运行即得曲线如图1所示。 在这里说明一点，要作空间曲线的图形，必须先求出该曲线的参数方程。如果曲线为一般式 SKIPIF 1 0 ，其在 SKIPIF 1 0 面上的投影柱面的准线方程为 SKIPIF 1 0 ，可先将 SKIPIF 1 0 化为参数方程 SKIPIF 1 0 ，再代入 SKIPIF 1 0 或 SKIPIF 1 0 解出 SKIPIF 1 0 即可。 空间曲面的绘制 作一般式方程 SKIPIF 1 0 所确定的曲面图形的Mathematica命令为： Plot3D[f[x,y],{x,xmin,xmax},{y,ymin,ymax},选项] 作参数方程 SKIPIF 1 0 所确定的曲面图形的Mathematica命令为： ParametricPlot3D[{x[u,v],y[u,v],z[u,v]},{u,umin,umax}, {v,vmin,vmax},选项] 作出上半球面 SKIPIF 1 0 的图形。 解：首先我们选取绘图区间 SKIPIF 1 0 作图，输入下面语句： 运行后得到了该曲面的图形（图2），但是在图形的前面出现了一些蓝色字体报错信息，而且图形不完整，这是因为函数 SKIPIF 1 0 在范围 SKIPIF 1 0 内的一些点处无定义。为避免上述问题，可用下面两种方法： 定义一个分区域函数 SKIPIF 1 0 ，将无定义的点赋予函数值1： SKIPIF 1 0 ， 作出该函数的图形只要键入命令： 运行后得图3，可以看到该图形比上半球面多了一部分曲面的图形（即 SKIPIF 1 0 平面上的部分）。但是图形比较粗糙，我们可以提高采样点数，例如取采样点数为30，即运行命令 可得图形4，由此可见图形已经比较精细了。 图2 图3 图4 采用参数方程，选取参数的范围使得区域内的每一点都有定义。对于题目中的球面 有参数方程 SKIPIF 1 0 ，我们输入命令： 运行后得图形5。我们还可以改变参数的范围画出上半球面的 SKIPIF 1 0 部分（如图6）： 图5 图6 空间图形的叠加 与平面图形类似，空间的立体图形同样可用“Show”命令，把不同的图形（曲线或曲面）叠加并在一个坐标系中显示出来。 例3 画出由旋转抛物面 SKIPIF 1 0 与上半球面 SKIPIF 1 0 相交所围成的立体几何图形。 解：这是一个组合图形。一般地，直接画出两者的图形再组合在一起。但是，这里所要的图形仅仅是两个曲面图形的一部分，因此需要有选择地画出两曲面的相应部分再组合。由于它们的交线为 SKIPIF 1 0 ，故相应的曲面部分的参数方程为： SKIPIF 1 0 与 SKIPIF 1 0 。 输入以下Mathematica语句： 运行后即得旋转抛物面、上半球面及叠加曲面的图形（图7）。 图7 例4 绘制由曲面 SKIPIF 1 0 与 SKIPIF 1 0 所围成的立体区域。 解：输入命令：