五、实验的简单操作过程.ppt

理工数学实验 理工数学实验五、实验简单的操作过程 1.(1) In[1]: = Plot3D [ Sin [ x*y ], {x, 0, 4}, {y, 0, 4} ,PlotPoints - 40, Mesh - False ];五、实验简单的操作过程 1.(2)In[2]: = ParametricPlot3D[{Cos[t](3+Cos[u]),Sin[t]*(3+Cos[u]),Sin[u]},{t,0,2Pi},{u,0,2Pi},Axes?False]五、实验简单的操作过程 1.(3)In[3]: = ParametricPlot3D[{5Cos[u]*Sin[v],5Sin[u]*Sin[v],3Cos[v]},{u,0,2p},{v,0,Pi/2}]五、实验简单的操作过程 1.(4)In[4]: = ParametricPlot3D[{u*Cos[v],u*Sin[v],u^2},{u,0,2},{v,0,2Pi}];五、实验简单的操作过程 1.(5)In[5]: = ParametricPlot3D[{Cos[5t],Sin[3t],Sin[t]},{t,0,2Pi}]五、实验简单的操作过程 2. In[6]: = Graphics`SurfaceOfRevolution`SurfaceOfRevolution[Sin[x],{x,0,2Pi}]五、实验简单的操作过程 3. In[8]: = ContourPlot[Sin[xy],{x,0,4},{y,0,4},ContourLines→False]五、实验简单的操作过程 4. In[9]: = Graphics\Animation.m;Animate[Plot3D[Cos[Sqrt[x^2+y^2]]*Cos[t],{x,-10,10},{y,-10,10},PlotPoints?40,Ticks?None,ViewPoint?{2,5,3}],{t,0,Pi,Pi/6}]五、实验简单的操作过程 5.我们选用球体和圆体， 其中． In[11]:= r=4;h=6; Animate[ParametricPlot3D[{{r*Cos[u]*Sin[v],r*Sin[u]*Sin[v], r*Cos[v]},{r/2*Cos[u]+2r-3/2t,r/2*Sin[u],v}},{u,0,2Pi},{v,-3/2Pi, 3/2Pi},PlotPoints-20,PlotRange-{{-h,h},{-h,h},{-h,h}},ViewPoint-{1,2,2},Axes-False],{t,0,r,r/8}]五、实验简单的操作过程 5. 六、思考与提高用参量函数与直接函数显示图形有什么区别？比较谁更容易作出图形？ 七、练习内容 1.(2)椭球抛物面，其中(3)双曲抛物面，其中(4)圆柱螺线，其中 七、练习内容 2.制作函数，其中的投影图形． 3.制作函数沿轴旋转所得旋转面的图形． 4.制作平面振动动画（利用函数，其中x,y均属于(-1，1)）． 理工数学实验五、实验的简单操作过程 1．本题目可以用两种方法解决． 方法一：In[1]:=z=x*Sin[y]+y*E^xOut[1]:=In[2]:=y=f[x](注： 是 的函数)Out[2]:=f[x]In[3]:= D[z==0,x](注：方程两边同时对 求导)Out[3]:=In[4]:= result=Solve[%,f‘[x]](注：解出)Out[4]:=五、实验的简单操作过程 1. In[5]:= x=0(注：给 赋初值)Out[5]:= 0In[6]:=Solve[z==0,y](注：解出 的初值)Out[6]:={{f[0]-0}}In[7]:=result/.{x-0,y-0}(注：代入的初值，求初)Out[7]:= 方法二：In[8]:=Clear[x,y](注：清除)fx=D[z,x]五、实验的简单操作过程 方法二：fy=D[z,y]yx=-fx/fyx=0;Solve[z==0,y]Out[9]:=Out[10]:=Out[11]:=Out[13]:= {{y-0}}In[14]:= yx/. {x-0,y-0}Out[14]:= 0五、实验的简单操作过程 2. In[15]:=Clear[x,y,z]z=Cos[Sqrt[x^2+y^2]]zx=D[z,x]zy=D[z,y]zxy=D[z,x,y]Out[16]:=Out[17]:=Out[18]:=Out[19]:=五、实验的简单操作过程 3．In[20]:= Clear[x,y,z]f=x+2y+z-2Sqrt[x*y*z]fx=D[f,x];fy=D[f,y];