5_微积分运算.pptVIP

第五讲微积分运算 4.1 求极限运算 Mathematica提供了计算函数极限的命令的一般形式为： Limit[函数, 极限过程] 具体命令形式为 命令形式1: Limit[f, x- x0] 功能:计算 , 其中f是x的函数。 命令形式2: Limit[f, x- x0, Direction- 1] 功能:计算，即求左极限, 其中f是x的函数。 命令形式3: Limit[f, x- x0, Direction- -1] 功能:计算，即求右极限，其中f是x的函数。 注意:在左右极限不相等或左右极限有一个不存在时,Mathematica的默认状态为求右极限。 例1. 求极限解： Mathematica 命令为 In[1]: Limit[n^2*Sin[1/n^2],n- Infinity] Out[1] 1 例3: 写出求函数 在x- 0的三个极限命令 解：Mathematica 命令为 1.Limit[Exp[1/x], x- 0] 2.Limit[Exp[1/x], x- 0, Direction- 1] 3.Limit[Exp[1/x], x- 0, Direction- -1] 例4.求解：Sin[x]/x x- ∞的极限 Mathematica 命令为 In[3]: Limit[Sin[x]/x, x- Infinity]Out[3] 2 Out[3] 0 例5求解：e1/x x- 0-的极限 In[4]: Limit[Exp[1/x], x- 0, Direction- 1] Out[4] 0 例6求解：1/ x* lgx 2 -1/ x-1 2在x- 1的极限 In[5]: Limit[1/ x*Log[x]^2 -1/ x-1 ^2, x- 1] Out[5] 1/12 例7. 求极限解： sinxtanx x- Pi/2 Mathematica 命令为 In[1]: Limit[Sin[x]^Tan[x], x- Pi/2] Out[1] 1 例10 求极限解: 若输入命令 In[4]: Limit[ Integrate[ArcTan[t]^2, t,0,x ] / Sqrt[1+x^2] , x- +Infinity] 屏幕会出现如下的红色英文提示信息: On::none: Message SeriesData::csa not found. …………………………………………………… ComplexInfinity + encountered. 说明不能得出正确结果。此时可以借助人工处理，如用一次洛必达法则后再求极限: In[5]: Limit[ArcTan[x]^2/ x/Sqrt[1+x^2] , x- Infinity] Out[5] 4.2 求导数与微分 4.2.1 求一元函数的导数与微分 例6:变上限函数 求导 解：Mathematica 命令为 In[6]: D[Integrate[Sqrt[1-t^2], t,0,x^2 ], x] Out[6] In[7]: Simplify[%] Out[7] 参数方程求导 对参数方程 所确定的函数y f x ,根据公式和命令形式1，可用三个Mathematica命令实现对参数方程的求导: r D[x, t]； s D[y,t]； Simplify[s/r] 或用Mathematica自定义一个函数： pD[x_, y_, t_]: Module[ s D[y,t], r D[x,t] , Simplify[s/r]] 来实现。 例7.求参数方程 的一阶导数 隐函数求导 由方程f x, y 0所确定的函数y y x 的导数可用一个自定义函数完成，这个函数为: impD[eqn_,y_,x_]: Module[ s, r, t , s D[eqn, x, NonConstants- y ]; r Solve[s, D[y, x, NonConstants- y ]]; t D[y,x, NonConstants- y ]/.r; Simplify[t] ] 例8. In[11]: D[Tan[x+a],x] Out[11] Sec[a + x] 2 In[12]: D[2^ x/Log[x] ,x] Out[12] In[13]: D[x*Tan[x]-Sqrt[x],x] Out[13] In[14]: D[Sin[x]^n*Cos[n*x],x] Out[14] In[15]: Plot[Evaluate[D[Sin[x^2],x]], x,-2,2 ] Out[15] 练习. 1 要对一个方程求导，应该怎么做？ 例如方程y5+2y-x-3x7 0