Mathematica40第二讲.pptVIP

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  4. 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  5. 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  6. 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  7. 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
用Mathematica画函数的图象 ? 3.1??基本一元函数作图 命令格式: 其中f[x]代表一个函数表达式,x表示函数的自变量,xmin,xmax分别表示所要做的图形中x取值的下、上限。可选项是对图形参数的设定,如果不写可选项,则系统按内定的参数输出图形。 同时画多个函数的图形。命令格式: 注意,多个函数应该使用同一个自变量x. 3.2 参数方程作图 例 画函数的图形ParametricPlot[{2*(t-Sin[t]),2*(1-Cos[t])},{t,0,2*Pi}] 3.3 极坐标方程作图 3.4 隐函数作图 首先输入命令Graphics\ImplicitPlot.m 调出函数ImplicitPlot,再输入 ImplicitPlot[表达式,{x,x1,x2}] 如:作隐函数的图像。 ImplicitPlot[x^3+y^3==3x*y,{x,-3,3}] 3.5 绘图参数 Mathematica的绘图命令有两类参数, 第一类是对图形的比例,边框和绘图范围等的限定; 第二类是对图形的修饰与加工 3.5.1 第一类可选参数项 AspectRatio-Automatic表示按实际比例作图。在不加这项参数时,系统按高宽比1/0.618作图。也可按需求自设比例,如 AspectRatio-1/2,表示高宽比为1/2。 Frame- False(或True )指定图形是否加边框 AxesLabel-{“x轴”,“y轴”} 指出坐标轴的标记 PlotLabel-“图形名称”指出所画图形的名称 PlotRange-{a,b} 指定图形在纵坐标方向上的范围 3.5.2第二类参数 对图形的修饰与加工 PlotStyle 说明用什么方式画图形。其值主要有RGBColor[r,g,b] 说明图形的颜色。r,g,b是三个[0,1]之间的实数,分别说明红(Red)、绿(Green)、兰(Blue) 的强度。不同的搭配能形成各种各样的颜色。 3.6 三维图形命令 Lighting 光照参数。如果光照参数设为False ,则显示黑白效果。系统默认为True。这时系统将以照明模拟效果代替内在颜色; ViewPoint-{x0,y0,z0} 视点的位置。在Input 菜单中有一个3D ViewPoint Selector ,点击它会打开一个选择对话框,调整各个选项,然后按Paste键,可以得到合适的观察角度; Boxed 当设为False时,取消边框; Axes 当设为False时,将不显示坐标轴; HiddenSurface 说明是否隐藏曲面被遮住的部分; BoxRatios 三轴比例 3、画出下列函数的图像 用Mathematica解方程 Solve[ f[x]= =0,x] 4.1 Mathematica用于解方程的命令: 1、Solve[f[x]= =0,x] 2、NSolve[f[x]==0,x] 3、Roots[f[x]==0,x] 4、Reduce[f[x]==0,x] 5、FindRoot[f[x]==0,{x,x0}] 6、 FindRoot[f[x]==0,{x,x0,x1}] 注意:“=”表示赋值,“==”表示逻辑等。 例1 解方程 NSolve[f[x]==0,x ] 对于5次及5次以上的方程已经没有公式解 Solve[ ]只能给出以Root表示的抽象解 这时改用NSolve[ ]能求出近似值。 例2 求五次方程的根 Roots[ ] Roots的用法有所区别,其输出的结果是逻辑表达式。 Reduce[ ] Reduce函数给出方程的全部解。Reduce函数详细讨论了各种可能的情况,而Solve只考虑了a≠0的一种情况。 切线法 FindRoot[ eqn,{x,x0}] 对于没有初等函数解的方程,Solve 可能解不出来,这时用FindRoot求函数的近似解。用FindRoot[egn,{x,x0}]时Mathematica是根据牛顿迭代法求根的近似值。因此初值x0要选择的与真值不能太远。 求解方程 割线法FindRoot[eqn,{x,x0,x1}] 求方程的根。 方程组求根 求解方程组的命令是Solve[{方程1,方程2,…},{未知数1,未知数2,…}] 解方程组。 In[1]:=Solve[{x+y==0,3*x+y==1},{x,y}] Out[1]= 消元 我们平时在解方程组的时候基本是用消元法,现在在介绍个用来消元的命令: Eliminate[{方程1,方程2,…},{变量1,变量2,…}] 在一组方程中消掉变量1,变量2等。 从方程组中消去未知数。 In[1]:=Eliminate[{x^2+y^2+z^2==1,x^2+

文档评论(0)

peain + 关注
实名认证
文档贡献者

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

1亿VIP精品文档

相关文档