极限、微分4 Mathematica在极限中的应用 数学软件和 与数学实验 .pptVIP

Mathematica For Windows Mathematica I n 高等数学 一、 Mathematica在极限中的应用 基本语句 Limit [ f[x], x-a] Limit [ f[x], x-a，Direction--1] Limit [ f[x], x-a，Direction-+1] Limit [ f[x], x-Infinity] Limit [ f[x], x- Infinity ，Direction--1] Limit [ f[x], x- Infinity ，Direction-+1] 求极限举例-1 f[n_]:=(2n^3+1)/(5n^3+2) Limit[f[x],x-Infinity]//N Table[f[n],{n,1,60}]//N ListPlot[%,PlotStyle-PointSize[0.03]] ＝0.4 求极限举例-2 Clear[f] f[x_]:=Sin[1/x] Plot[f[x],{x,-1,1}] Limit[f[x],x-0] Interval[{-1, 1}] 该极限程序没有结果 求极限举例-3 Clear[f] f[x_]:=x*Sin[1/x] Plot[f[x],{x,-1,1}] Limit[f[x],x-0] =0 a[n_]:=100000(1+0.005/n)^n; Limit[a[n],n-Infinity] 100501. 程序如下： 注: 这就是经济学中常见的连续计息问题。 某人为支持教育事业，一次性存入一笔助学基金，用于资助某校贫困生。假设该校每年末支取10000元，已知银行年利率为5％，如果该基金供学校支取的期限为20年。问：此人应存入多少资金？如果该基金无期限地用于支持教育事业，此人又应该存入多少资金？ 求极限举例-5 设年利率为i，每年末支取额为P,支取期限为n，期初存入资金为f(n),则： 第1年末支取额为P时，期初应存入金额为； 第2年末支取额为P时，期初应存入金额为 ： …… 第n年末支取额为P时，期初应存入金额为 若每年支取P元，共支取n年，则期初应存入金额为： Clear[f,P] P=10000; i=0.05; f[n_]:=Sum[P*1/(1+i)^k,{k,1,n}] Table[{n,f[n]},{n,1,20}]; TableForm[%] f[100] Limit[f[n],n-Infinity] 1 . 9523.81 3. 27232.5 5 . 43294.8 7. 57863.7 9. 71078.2 . 83064.1 13. 93935.7 15. 103797 17. 112741 19. 120853 20. 124622 程序如下： 二、 Mathematica在微分学中的应用 基本语句 1、D[f[x],x] 对一元函数求导 2、D[f[x,y],x] 对二元函数关于x求偏导 D[f[x,y],y] 对二元函数关于y求偏导 3、Table[{D[f[x,y],x], D[f[x,y],y]}] 对二元函数关于x,y同时求偏导 4、D[f[x],{x,n}] 对一元函数求n阶导 5、D[f[x,y],{x,n},{y,m}] 关于x求n阶导，关于y求m阶导 6、Dt[f[x]]… 对一元函数求微分 7、隐函数的求导： （一）Dt[F[x,y]==0,x] Solve[%,Dt[y,x]] (二) Solve[D[F[x,y]==0,x]],Dt[y,x]] 8、参数形式的导数： x[t]=…;y[t]=… ParametricD[t_]:=D[y[t],t]/D[x[t],t] ParametricD[t] 9、幂指函数的求导：D[u[x]^v[x],x] 求导数举例 （1）设 求 （2） y[x_]:=x^(x*Tan[x]); D[y[x],x] z[x_,y_]:=Cos[Sqrt[x^2+y^2]]; D[z[x,y],x] D[z[x,y],y] D[z[x,y],{x,1},{y,1}] D[z[x,y],{x,10},{y,10}] Solve[{D[x*u[x,y]-y*v[x,y]==0,x], D[y*u[x,y]+