高等数学实验：泰勒展开与函数逼近图像分析.pdfVIP

高等数学数学实验报告

实验人员：院（系）21学号

成绩

实验时间：2007-12-31

实验一泰勒和函数近

2

一、实验题目：作出函数y=Incosx+sinx（-pi/4=xpi/4）的函数图形和

泰勒展开式（选取不同的x0和n值）图形，并将图形进行比较。

二、实验目的和意义

利用Mathematica计算函数f(x)的各阶泰勒多项式，并通过绘制

曲线图形来进一步掌握泰勒展开与函数近的思想。

三、计算

n

k

fx0

fx=fx0++ox-x0n

k!

k1

四、程序设计

t=Table[Normal[Series[Log[Cos[x^2]+Sin[x]],{x,0,i}]],{i,1,5,

2}];

PrependTo[t,Log[Cos[x^2]+Sin[x]]];

Plot[Evaluate[t],{x,-pi/4,pi/4}]

t=Table[Normal[Series[Log[Cos[x^2]+Sin[x]],{x,5,i}]],{i,1,11

,2}];

PrependTo[t,Log[Cos[x^2]+Sin[x]]];

Plot[Evaluate[t],{x,-pi/4,pi/4}]

五、程序运行结果

高等数学

安全:学院(系)21学号

电视___________时间:2007‑12‑31

一、题目：电视y2

中Icosx+sinx(‑pi/4xpi/4)的函数图和泰勒式

展开（选取不同的x0和n值）并比较该图。

实验一泰勒公式和定利近

二、实验目的及意义

使用Mathematica计算各个层次的函数f(x)，并通过绘制曲线图

进一步掌握函数。

三、计算n

nfHkLHx0L+oHx-x0L

HLHLãk!

fx=fx0+

k1

四、程序设计

t=表[正态[级数[对数[Cos[x^2]+Sin[x]],{x,0,i}]],{i,1,5,2}]；

PrependTo[t,Log[Cos[x^2]+Sin[x]]]；绘制[评估[t],

{x,‑pi/4,pi/4}]

t=表[正态[级数[对数[Cos[x^2]+Sin[x]],{x,5,i}]],{i,1,11,2}];

PrependTo[t,Log[Cos[x^2]+Sin[x]]]；情节[评估[t],

{x,‑pi/4,pi/4}]五、电视设计