找回密码
 注册会员

QQ登录

只需一步,快速开始

搜索
查看: 4916|回复: 12

请问这个定积分是怎么得到的

[复制链接]
发表于 2016-1-11 18:44:44 | 显示全部楼层 |阅读模式
没弄明白
: [7 c0 I* p0 F9 X" v9 l) L, }

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册会员

×
回复

使用道具 举报

发表于 2016-1-11 18:48:36 | 显示全部楼层
我平时都用这个软件,不过是在电脑上用。定积分,如果想看步骤的话。有step by step 功能,建议搜一下。
 楼主| 发表于 2016-1-11 19:57:55 | 显示全部楼层
本帖最后由 阳光小院暖茶 于 2016-1-11 19:59 编辑
  f: ^: Z1 p# [; g4 v
) H8 j# O+ l7 a8 B$ K; |这个是我手机截图的,我没这个东西。我在纸上试着算这个定积分,什么凑微分啦,换元啦,分部积分啦,都整不出来啊
发表于 2016-1-11 20:09:22 | 显示全部楼层
阳光小院暖茶 发表于 2016-1-11 19:57 / @6 D: S: n3 o" X$ H5 B0 D
这个是我手机截图的,我没这个东西。我在纸上试着算这个定积分,什么凑微分啦,换元啦,分部积分啦,都整不 ...

  r' w) L6 |, Q# r/ r这里的log是 我们平时写的ln吧???

点评

我猜是的,不然没法弄  发表于 2016-1-12 07:44
发表于 2016-1-11 20:27:51 | 显示全部楼层
应该是要用级数展开。。。。。。。。这部分知识我忘了、。。。( L  g: S! s2 `2 |6 |; J6 X
# y: b& G* _, d8 Y: ]: [
补充内容 (2016-1-12 21:35):
: X/ _  {4 g2 p. W9 @0 V+ i9 ?( h今天问了问刚考完研的学长,的确得用级数展开才能解出来

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册会员

×
发表于 2016-1-11 21:43:46 | 显示全部楼层
翻一翻数学手册吧
8 j# \0 E& I2 w3 r

点评

翻不到啊  发表于 2016-1-12 08:12
发表于 2016-1-11 21:49:31 | 显示全部楼层
手动算了一下,也没得出结果,还是软件快啊
( D9 v: t& s; c: Y  F! H) R2 q4 D; t' B% r( h8 `

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册会员

×

点评

恩,不过过程不清楚  发表于 2016-1-12 08:10
发表于 2016-1-11 21:53:13 | 显示全部楼层
刚刚试了分部积分法,发现没用
发表于 2016-1-11 21:53:21 | 显示全部楼层
刚刚试了分部积分法,发现没用

点评

恩,似乎要另外的办法  发表于 2016-1-12 08:13
发表于 2016-1-11 22:15:02 | 显示全部楼层
用数值积分吧  
  q; E7 w9 f, G& i3 c0 ]' s; _" F0 y0 N/ l
clear all7 `# C# |; H$ K, M4 m! d
format long! c- A$ V# w6 G/ E$ k* w3 B
a=0;
( c" O4 H7 I4 |& a7 X" Wb=1;
0 j, _' I1 r8 T$ Z2 U6 w! h: oepsilon=10^(-6);
4 c3 U; Q/ @5 l% w0 J# ysyms x;
# e& J% y7 n; ~: _& k' Qfun=log(x^2 + 1)/(x + 1);
4 C/ H. X/ w" w5 A+ _" uHfun=@ Remberg;
# ^& k4 B1 B8 ~Ivalue= feval(Hfun,fun,a,b,epsilon);
9 ]- p$ ^+ N  Z1 R* p; `
. a. f4 I( r7 n%Remberg.m+ L! j' f2 \  r( ^' c, p7 |
%a,b为积分限,epsilon为精度,s为返回积分值,fun为被积函数
; e; a5 ~& j% w( L. h%R(n,m)表示计算值,(n-1)为变步长指标,(m-1)为加速次数
) ?$ e- u9 J* K# sfunction s=Remberg(fun,a,b,epsilon)( \& c) [( _- P7 ?. L3 r
syms x ;
& l" r( {/ m9 b- ~$ D% g  p9 }fvalue=zeros(1,1000);
9 [  M9 t  I) O; I+ W. aR=zeros(100,100);
! i9 t: v$ S7 l% [" P5 i5 Q* lfvaluea=double(subs(fun,x,a));
# x- D* e% h4 y8 K- ffvalueb=double(subs(fun,x,b));
+ D0 X' t# |: i* B, BR(1,1)=(b-a)/2*(fvaluea+fvalueb);   %梯形公式- F) w* J7 z: e
km=1;
4 H6 M1 @. m2 n( P( h& E+ hfor k1=1:100;   %设置一个比较大的循环量
- y% N6 X/ Y% y6 W, M( j( ?    h=(b-a)/(2^(k1));: \- ~( @" L9 Y& M5 \; L7 M5 x
    R(k1+1,1)=1/2*R(k1,1);
# r6 f  h4 d9 N) N: t! ?    for k2=1:2^(k1-1);7 w; d( J% v7 l* W. ^. ?0 ]  f
    fvalue(2*k2)=double(subs(fun,x,a+(2*k2-1)*h));, X" A$ I* ^3 O1 S7 V7 k% _
    R(k1+1,1)=h*fvalue(2*k2)+R(k1+1,1);  %变步长值- q9 p2 O# e) J- @+ }
    end: s( F8 Y; z& v) d, A/ L2 p
  for k3=1:km;  %加速计算
: ~5 O5 q' Y9 C; x: o6 K      R(k1+1,k3+1)=1/(4^(k3)-1)*(4^(k3)*R(k1+1,k3)-R(k1,k3));5 i+ H% z4 F5 |6 n
  end$ U4 @1 t+ k  ~5 v
  if abs(R(k1+1,km+1)-R(k1+1,km))<epsilon   %控制精度
9 C6 l' p( r! N5 ^: g! L      s=R(k1+1,km+1);% k; R! L6 b' q- U
      break;0 h$ M6 b+ n6 d6 X
  else
& D/ H3 s( F3 I! Y* ]9 H: J- h      km=km+1;8 B( z' T) M& [' S# q1 @5 ?# c
  end
* K; Q" i% }$ v" d1 r- U5 A3 O1 H4 J/ ~
end
) ^6 ~3 G' V+ `) N1 r0 B$ s8 h- J1 s  a# J2 I8 ]9 v! }1 v0 Q* c5 ~: f
您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

Archiver|手机版|小黑屋|机械社区 ( 京ICP备10217105号-1,京ICP证050210号,浙公网安备33038202004372号 )

GMT+8, 2025-10-17 12:48 , Processed in 0.074031 second(s), 16 queries , Gzip On.

Powered by Discuz! X3.5 Licensed

© 2001-2025 Discuz! Team.

快速回复 返回顶部 返回列表