2014工程数学实验C期末大作业2.docVIP

成绩： 轻工学院 2014工程数学实验C报告 学院: 轻工学院 姓名: 阚宇 班级: 工商三班 学号: 201224270332 电话: Email: 759188123@ Ⅰ 展示图形之美篇 要求：要求用中文宋体五号字输入文字，Mathematica程序默认格式即可。用word自带公式编辑器输入所有数学公式，在运行结果后输入结果分析，可以是题目的结论，也可以是对题目的理解与认识。 【数学实验一】题目：利用Mathematica制作如下图形 （1），，其中k的取值为自己学号的后三位。 （2），其中k的取值为自己学号的后三位。 Mathematica程序：(1)ParametricPlot[{332Sin[t],332Sin[2t]},{t,0,2Pi}] 结果分析：通过运行ParametricPlot 得出上边的图。 (2) x[u_,v_]:=Sin[u]Cos[332v]; y[u_,v_]:=Sin[u]Sin[v]; z[u_,v_]:=Cos[u]; ParametricPlot3D[{x[u,v],y[u,v],z[u,v]},{u,0,Pi},{v,0,2Pi},Boxed?False,BoxRatios?{1,1,1}] 结果分析：通过运算x,y,z得出如上图示。 【数学实验二】题目：请用Mathematica制作五个形态各异三维立体图形，图形函数自选，也可以由几个函数构成更美观、更复杂的图形;并用简短的语言说明选择该图形的理由和意义。 Mathematica程序：x[u_,v_]:=Sec[u]Cos[668v]; y[u_,v_]:=Tan[u]Sin[v]; z[u_,v_]:=Cot[u]; ParametricPlot3D[{x[u,v],y[u,v],z[u,v]},{u,-Pi/3,Pi/3Pi},{v,0,2Pi},Boxed?False,BoxRatios?{1,1,1}] 运行结果：x[u_,v_]:=Sec[u]Cos[v]; y[u_,v_]:=Sec[u]Sin[v]; z[u_,v_]:=Tan[u]; ParametricPlot3D[{x[u,v],y[u,v],z[u,v]},{u,-Pi/3,Pi/3Pi},{v,0,2Pi},Boxed?False,BoxRatios?{1,1,1}] 结果分析：图像海中石柱，任海水吞噬，仍坚挺矗立。 结果分析：图像花瓶，比花还美丽的瓶，如若装上鲜花，尤像仙女戴花，花美人更美。 Mathematica程序：x[u_,v_]:=Sec[u]Cos[v]; y[u_,v_]:=Sec[u]Sin[v]; z[u_,v_]:=Cot[u]; ParametricPlot3D[{x[u,v],y[u,v],z[u,v]},{u,-Pi/3,Pi/3Pi},{v,0,2Pi},Boxed?False,BoxRatios?{1,1,1}] 结果分析：图像一只旋转陀螺，对他进行加速抽打，便非一般旋转。我们人也一样，有压力变会有相应的动力，苦难并不一定总会压在我们头顶，一旦把它踩在脚下便会成为前进中基石。 Mathematica程序：x[u_,v_]:=Sec[u]Cos[v]; y[u_,v_]:=Sin[u]Sin[v]; z[u_,v_]:=Cos[u]; ParametricPlot3D[{x[u,v],y[u,v],z[u,v]},{u,-Pi/3,Pi/3Pi},{v,0,2Pi},Boxed?False,BoxRatios?{1,1,1}] 结果分析：图像一块衡板，如同我们生活一样，在工作、学习、生活、这三者之间，需掌握好平衡，不能过分偏重哪一者，否则过犹不及，也不能忽视其中之一，避免行百里者半九十。 Mathematica程序：x[u_,v_]:=Sin[u]Cos[v]; y[u