mathematical的应用.doc

  1. 1、本文档共17页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
mathematical的应用

数学分析实验报告 姓名: 胡兰 学号: 成绩:________ 小组成员:魏伦,林易宁,董莹,胡兰 所用程序:Wolfram Mathematica 9.0 内容摘要 我们主要从三方面来讲述我们学到的知识,我们使用Wolfram Mathematica 9.0的制图功能绘制了我们熟悉的机器猫;同时也借助绘图工具绘制了《高等数学》(上海大学数学系编,高等教育出版社,2011.1)中函数的图像。另外站在一年微积分和线性代数的学习之上,我们用Wolfram Mathematica 9.0演算了函数极限、导数与微分、不定积分和定积分、线性代数运算和线性规划问题。 目录 一 绘图 机器猫; MATH字样; 东方明珠; 二 函数图形的绘制 一元函数; 多元函数; 参数函数; 三 微积分 函数与极限; 导数与微分; 多元函数的偏导数与全微分; 不定积分; 定积分 函数的局部极值; 线性规划; 绘图 机器猫(平面参数曲线,一元函数,二维图元作图) 原图: 头部:ParametricPlot[{x=Sin[t],y=Cos[t]},{t,0,2Pi},ImageSize?Medium] ParametricPlot[{x=Sqrt[0.8]Cos[t],y=Sqrt[0.5]Sin[t]},{t,-Pi,0}] 嘴巴:ParametricPlot[{x=Cos[t],y=Sqrt[0.4]Sin[t]},{t,0,Pi}] 眼睛:Show[Graphics[Circle[{0.2,0.57},{0.2,0.26}]]] Show[Graphics[Circle[{-0.2,0.57},{0.2,0.26}]]] Show[Graphics[Circle[{-0.11,0.52},{0.07,0.12}]]] Show[Graphics[Circle[{0.11,0.52},{0.07,0.12}]]] Show[Graphics[Circle[{-0.11,0.52},{0.02,0.042}]]] Show[Graphics[Circle[{0.11,0.52},{0.02,0.042}]]] 鼻子:Show[Graphics[Circle[{0,0.25},0.13]]] Show[Graphics[Line[{{0,0.1235},{0,-Sqrt[0.5]}}]]] 胡须:Plot[0.05x,{x,0.35,1}] Plot[-0.05x,{x,-0.35,-1}] Plot[0.384x,{x,-0.35,-0.95}] Plot[0.384x,{x,0.35,0.95}] Plot[-0.384x,{x,-0.35,-0.95}] Plot[-0.384x,{x,0.35,0.95}] 去掉坐标系显示: Show{%120,%121,%122,……,%138,Axes-False} 2.MATH字样(折线图) (1) (2) (3)Show 、 3.东方明珠 三个主球:a1=ParametricPlot3D[{2Cos[t]Cos[u],2Sin[t]Cos[u],2Sin[u]-2},{t,0,2Pi},{u,0,2Pi}] a2=ParametricPlot3D[{1.5Cos[t]Cos[u],1.5Sin[t]Cos[u],1.5Sin[u]+8.5},{t,0,2Pi},{u,0,2Pi}] a3=ParametricPlot3D[{0.5Cos[t]Cos[u],0.5Sin[t]Cos[u],0.5Sin[u]+13},{t,0,2Pi},{u,0,2Pi}] 线:a4=Show[Graphics3D[Line[{{-0.05,0,13},{-0.05,0,8.5}}]]] a5=Show[Graphics3D[Line[{{0.05,0,13},{0.05,0,8.5}}]]] a6=Show[Graphics3D[Line[{{-0.6,0,-2},{-0.6,0,8.5}}]]] a7=Show[Graphics3D[Line[{{0.6,0,-2},{0.6,0,8.5}}]]] a8=Show[Graphics3D[Line[{{0.65,0,-1.9},{0.65,0,8.8}}]]] a9=Show[Graphics3D[Line[{{-0.65,0,-1.9},{-0.65,

文档评论(0)

haihang2017 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档