- 在线时间
- 4 小时
- 最后登录
- 2015-3-20
- 注册时间
- 2014-11-2
- 听众数
- 11
- 收听数
- 0
- 能力
- 0 分
- 体力
- 34 点
- 威望
- 0 点
- 阅读权限
- 20
- 积分
- 14
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 8
- 主题
- 4
- 精华
- 0
- 分享
- 0
- 好友
- 1
升级   9.47% TA的每日心情 | 怒 2015-3-16 11:27 |
|---|
签到天数: 3 天 [LV.2]偶尔看看I
- 自我介绍
- 学生
 |
f[x_] := 1/(A - F*x^2 + x*B I);7 z4 y/ k4 K0 v
g[y_] := 1/(A - F*y^2 + y*B I);
6 q1 @" ? r" v+ A! d3 u8 e3 M3 Qh[z_] := 1/(A - F*z^2 + z*B I);1 p. f* b, O6 M% F* a
j[x_, y_, z_] := 1/(A - F*(x + y + z)^2 - (x + y + z)*B I);
/ x% Y2 z, F. W$ O& X( D5 G) Vresult = Integrate[f[x]*g[y]*h[z]*j[x, y, z], x, y, z]
0 }+ }. r, X: ` D5 e所有的积分上限都是+ 无穷,下限是 - 无穷。! b1 q0 i" C) e: {: [' }2 }4 ]
) C0 h8 n5 @% E
我想请教一下,有没有什么方法可以计算这个三重积分?7 N- |4 T" W* a' Z+ X
当我转化了球面坐标后,发现还是算不动。。。。6 q& Q' X7 q9 A1 X! J
, z+ D* \7 I! S+ _$ H
( Z, i0 N6 f: O4 [8 u3 S
f[x_] := 1/(a - c*x^2 + x*b I);& r# a4 |" k1 M
g[y_] := 1/(a - c*y^2 + y*b I);
1 E+ ]' B$ x5 v! e' b/ ]h[z_] := 1/(a - c*z^2 + z*b I);8 M7 X8 A+ j" |% P9 P1 W
j[x_, y_, z_] := 1/(a - c*(x + y + z)^2 - (x + y + z)*b I);. Y( t, G; X) n- k9 P* k
\[Theta]1 = 0; \[Theta]2 = Pi; \[Phi]1 = 0; \[Phi]2 =
) Q4 J6 c5 Y* ?- }7 V9 T2*Pi; r1 = 0; r2 = 1;. @4 L0 Q$ e+ G/ @2 o9 L) ]
Integrate[
" h6 i* C4 Y' x& @5 _2 fr^2*Sin[\[Theta]]*f[r Sin[\[Theta]] Cos[\[Phi]]]*
3 j! r8 ?0 F& T8 P. mg[r Sin[\[Theta]] Sin[\[Phi]]]*h[r Cos[\[Theta]]]*, ]' l2 _, c0 p. K7 J+ g+ d* n
j[r Sin[\[Theta]] Cos[\[Phi]], r Sin[\[Theta]] Sin[\[Phi]], , q2 G4 C4 t d& y2 y0 j
r Cos[\[Theta]]], {\[Phi], \[Phi]1, \[Phi]2}, {r, r1,
/ m2 K6 X K4 v. Z& X) Gr2}, {\[Theta], \[Theta]1, \[Theta]2},]5 h* t+ S. Y$ e( v* s
! k/ }# B( q6 j* A
|
zan
|