实验1绘制参数曲线 y=2cost的图形 z=t/2 程序 ParametricPlot3D[Sin[t], 2Cos[t, t/2),t,0, 12); 结果 实验2绘制参数曲线,1的图形 arctan 程序 ParametricPlot3D[Cos[t 2, 1/(1+2*t), ArcTan[t]i, t,0, 8] 结果
实验1 绘制参数曲线 的图形 程序: ParametricPlot3D[{Sin[t],2Cos[t],t/2},{t,0,12}]; 结果: 实验2 绘制参数曲线 的图形 程序: ParametricPlot3D[{Cos[t]^2,1/(1+2*t),ArcTan[t]},{t,0,8}]; 结果:
实验3画出函数 2=sm(xVx2+y)的图形 程序 Plot3D[Sin[Pi"Sqrt[x2+y 2I,(x-1, 1,y-1, 1) PlotPoints->30, Lighting->True 结果 实验4画出函数 2=-其记 2y2的图形 程序: Plot3D[* y*Expl-x2-y 2],x-2, 2),y-2, 23, Plot Points->30, AspectRatio->Automatic 结果
实验3 画出函数 的图形 程序: Plot3D[Sin[Pi*Sqrt[x^2+y^2]],{x,-1,1},{y,-1,1}, PlotPoints->30,Lighting->True]; 结果: 实验4 画出函数 的图形 程序: Plot3D[-x*y*Exp[-x^2-y^2],{x,-2,2},{y,-2,2},PlotPoints->30, AspectRatio->Automatic]; 结果:
v coS1 实验5绘制参数方程给出的球面 sinu 的图形 程序: ParametricPlot3D[Sin[v]"Cosu], Sin[v]"Sin[u]. Coslvb(u,0, 2P13,(v, 0, Pi] 结果
实验5 绘制参数方程给出的球面 的图形 程序: ParametricPlot3D[{Sin[v]*Cos[u],Sin[v]*Sin[u],Cos[v]},{u,0,2Pi},{v,0,Pi}]; 结果:
实验6画出圆环 y=(8+3cosv)sinu∈0.z 兀,-的图形 =sina 程序 ParametricPlot3D[(8+3*Cos[]*Cos[u], (8+3 Cos[v])*Sin[ul 7*snv]}{u0,3Pi/2},{vPi2,2Pi} 结果 x= cousin y 实验7画出参数曲面 y=sinusin) H|04x]’v∈[00的图 z=coSy+In(tan/2+u/5) 形 程序: ParametricPlot3DRCoslu"Sin], sinu[v cos[v]+Log[Tan( v/2+u/5,u, 0, 4 Pil {v.001,2}]; 结果:
实验6 画出圆环 , , 的图形 程序: ParametricPlot3D[{(8+3*Cos[v])*Cos[u],(8+3*Cos[v])*Sin[u], 7*Sin[v]},{u,0,3Pi/2},{v,Pi/2,2Pi}]; 结果: 实验7 画出参数曲面 , , 的图 形 程序: ParametricPlot3D[{Cos[u]*Sin[v],Sin[u]Sin[v],Cos[v]+Log[Tan[v/2]+u/5]},{u,0,4*Pi}, {v,0.001,2}]; 结果:
实验8画出由旋转抛物面z=x+y2与上半球面=1+、-x2-y5相交所图成的几 何体的图形 程序 1=ParametricPlot3Dr*Cos[t], r"Sin[t), r2,t,, 2 P1,r, 0, 1) PlotPoints->301 g2=ParametricPlot3D Cos[t]Sin(r),sin(t]*Sin[r], cos[r]+1),(t,0, 2Pi), r, 0, P1/2) PlotPoints->301 Showel, g2]
实验8 画出由旋转抛物面 与上半球面 相交所围成的几 何体的图形 程序: g1=ParametricPlot3D[{r*Cos[t],r*Sin[t],r^2},{t,0,2 Pi},{r,0,1}, PlotPoints->30]; g2=ParametricPlot3D[{Cos[t]*Sin[r],Sin[t]*Sin[r],Cos[r]+1},{t,0,2*Pi},{r,0,Pi/2}, PlotPoints->30]; Show[g1,g2];