Question

以下这个式子是用mathematica二重积分的结果，我想得到具体的值，应该怎么办啊？先行谢过各位啦。

原先的二重积分为：

其中a=9.7938

kaa = \!\(
\*SubsuperscriptBox[\(\[Integral]\), \(0\), \(2*Pi\)]\(
\*SubsuperscriptBox[\(\[Integral]\), \(0\), \(a\)]3.6329453076142135*
BesselJ[1, 0.3231840552186077*r]\ Sin[thita]*3.6329453076142135*
BesselJ[1, 0.3231840552186077*\((r + 0.403)\)]\ Sin[thita + 8/pi]*
r \[DifferentialD]r \[DifferentialD]thita\)\)





Answer 1

用数值积分就行了。可以直接用NIntegrate指令，如果你非要使用这种数学助手的行式，就在代码前面加个N@。然后，你式子里有个地方的Pi写成pi了。