两种公式数值积分的例子.xlsVIP

Sheet1

a

b

fx

fx_t

n

说明：

delta

Integral_Fx

n

=Sheet1!$B$10

X

1.在B3格中输入被积函数f(x)，不要等号。

2.在B5、B7格中输入上下限，注意f(x)在上下限之间均应有效。

3.定义的名称如下

4.实质本例主要是介绍EVALUATE宏表函数的一个扩展用法，可用于数组并返回数组。

5.界面是一些雕虫小技,单选框是用“窗体”工具做的。

6.本表已被保护，密码是chenjun

a

=Sheet1!$B$5

b

=Sheet1!$B$7

=(b-a)/100000

fx

=Sheet1!$B$3

fx_t

fx_a

=EVALUATE(SUBSTITUTE(SUBSTITUTE(UPPER(fx),X,a),EaP(,EXP())

fx_b

=EVALUATE(SUBSTITUTE(SUBSTITUTE(UPPER(fx),X,b),EbP(,EXP())

n为积分方式控制值，1为梯形公式，2为辛普生公式。

=EVALUATE(SUBSTITUTE(SUBSTITUTE(UPPER(fx),X,x_tu),Ex_tuP(,EXP()+0*x_tu)+0*a*b

=IF(n=1,a+((ROW(Sheet1!$1:$10000)-1)*10+TRANSPOSE(ROW(Sheet1!$1:$10)))*delta,a+ROW(Sheet1!$1:$50000)*2*delta)

X_s

fx_s

=EVALUATE(fx+0*x)

=IF(n=2,a+(ROW(Sheet1!$1:$50000)*2-1)*delta,0)

=IF(n=2,EVALUATE(SUBSTITUTE(SUBSTITUTE(UPPER(fx),X,X_s),EX_sP(,EXP()+0*X_s),0)

=IF(n=1,SUM(fx_t,(fx_a-fx_b)/2)*delta,SUM(2*fx_t,4*fx_s,fx_a-fx_b)*delta/3)

其中delta生成x的分割间距，X生成梯形法每个分割点及辛普生法偶数分割点的x值数组，X_s生成辛普生法奇数分割点的x值数组。

fx_a和fx_b为积分上下限处的函数值，fx_t为生成梯形法每个分割点和辛普生法偶数分割点的函数值数组，

fx_s为辛普生法奇数分割点的函数数组。

Integral_Fx为依据积分方法控制值n将每个小条的面积总和，即f(x)函数的数值积分。

x_tu和y_tu是生成图表系列线公式中的两个系列数组。

4/(1+x*x)

=a+(ROW(Sheet1!$1:$1001)-1)*(b-a)/1000

Sheet1!x_tu

Sheet1!y_tu

f(x)=

f(x)=4/(1+x*x)

.00

1.00

2.00

3.14

dx=

4/(1+x*x)dx=3.14159265358979

数值积分的计算(Chenjun青牛在线)

请输入被积函数f(x)=

请输入积分下限

请输入积分上限

请选择方式

梯形公式，低精度

辛普生公式，高精度

∫

f(x)=4/(1+x*x)