- 在线时间
- 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);
" F/ c! h. |% G7 {/ u9 @g[y_] := 1/(A - F*y^2 + y*B I);
# S9 S; R P% r, Ph[z_] := 1/(A - F*z^2 + z*B I);
' d/ h; b" U7 Kj[x_, y_, z_] := 1/(A - F*(x + y + z)^2 - (x + y + z)*B I);( [* A3 }' y3 n
result = Integrate[f[x]*g[y]*h[z]*j[x, y, z], x, y, z]
: u7 n$ |1 I7 u, t6 p0 v# a4 w& L; \! o所有的积分上限都是+ 无穷,下限是 - 无穷。
5 Y B- N' s5 |) l9 z; ? ~3 w% i+ Y1 P$ S" j
我想请教一下,有没有什么方法可以计算这个三重积分?4 R; z/ Y' O z/ N$ Y1 Z) L! a
当我转化了球面坐标后,发现还是算不动。。。。
- C2 E( f7 |- t; z& c- k# p
+ w0 \# z0 q3 |% L: X. j; ~( w7 L" r h/ [! R+ X& V# f
f[x_] := 1/(a - c*x^2 + x*b I);
$ z/ O' Y: A: w9 d( r9 Tg[y_] := 1/(a - c*y^2 + y*b I);
% q1 b! N, I0 m3 v1 @9 i9 V7 ah[z_] := 1/(a - c*z^2 + z*b I);
' i& q7 k$ {/ R5 M* w4 [j[x_, y_, z_] := 1/(a - c*(x + y + z)^2 - (x + y + z)*b I);* t% g. b, C$ k8 A+ h
\[Theta]1 = 0; \[Theta]2 = Pi; \[Phi]1 = 0; \[Phi]2 =
9 U" r1 U# p( M. ]2 u- [9 v- l4 i% ^2*Pi; r1 = 0; r2 = 1;1 g) v7 K# Y5 n3 u" S) z) y" C
Integrate[6 I. [+ n" a5 m1 C
r^2*Sin[\[Theta]]*f[r Sin[\[Theta]] Cos[\[Phi]]]*0 [5 R, {# c' v. \) Z( ?1 I% f
g[r Sin[\[Theta]] Sin[\[Phi]]]*h[r Cos[\[Theta]]]*
2 u$ G6 M2 J) |" _ W% ^- w1 e$ I9 S' W0 aj[r Sin[\[Theta]] Cos[\[Phi]], r Sin[\[Theta]] Sin[\[Phi]],
& T. _ C3 `6 [1 vr Cos[\[Theta]]], {\[Phi], \[Phi]1, \[Phi]2}, {r, r1,
8 Z- K5 k0 a; Q6 M( |3 er2}, {\[Theta], \[Theta]1, \[Theta]2},]
7 D: a& Q/ m: _! J. C4 |( @, `+ Z, T: M, K- Y5 X
|
zan
|