复杂的三重积分，mathematica算不了？
f := 1/(A - F*x^2 + x*B I);g := 1/(A - F*y^2 + y*B I);
h := 1/(A - F*z^2 + z*B I);
j := 1/(A - F*(x + y + z)^2 - (x + y + z)*B I);
result = Integrate*g*h*j, x, y, z]
所有的积分上限都是+ 无穷，下限是 - 无穷。
我想请教一下，有没有什么方法可以计算这个三重积分？
当我转化了球面坐标后，发现还是算不动。。。。
f := 1/(a - c*x^2 + x*b I);
g := 1/(a - c*y^2 + y*b I);
h := 1/(a - c*z^2 + z*b I);
j := 1/(a - c*(x + y + z)^2 - (x + y + z)*b I);
\1 = 0; \2 = Pi; \1 = 0; \2 =
2*Pi; r1 = 0; r2 = 1;
Integrate[
r^2*Sin[\]*f] Cos[\]]*
g] Sin[\]]*h]]*
j] Cos[\], r Sin[\] Sin[\],
r Cos[\]], {\, \1, \2}, {r, r1,
r2}, {\, \1, \2},]
页:
[1]