How can I evaluate the integral of $j_1 ^2(x)\exp(-bx)/x$ from 0 to ∞?


closed as off-topic by Daniel Lichtblau, Roman, garej, Edmund, MarcoB Jul 1 at 16:34

This question appears to be off-topic. The users who voted to close gave this specific reason:

  • "This question arises due to a simple mistake such as a trivial syntax error, incorrect capitalization, spelling mistake, or other typographical error and is unlikely to help any future visitors, or else it is easily found in the documentation." – Daniel Lichtblau, garej, Edmund
If this question can be reworded to fit the rules in the help center, please edit the question.


If you mean the Bessel function $J_1(x)$:

Assuming[b > 0,
  Integrate[BesselJ[1, x]^2*Exp[-b x]/x, {x, 0, ∞}]]

(π + b^2 EllipticE[-4/b^2] - (4 + b^2) EllipticK[-4/b^2])/(2π)

If you mean the spherical Bessel function $j_1(x)$, it's a bit harder:

J[b_, x_] = Integrate[SphericalBesselJ[1, x]^2*Exp[-b x]/x, x];
Assuming[b > 0,
  Limit[J[b, x], x -> ∞] - Limit[J[b, x], x -> 0, Direction -> "FromAbove"] // FullSimplify]

1/96 (-4 (-6 + b^2) - 32 b ArcTan[2/b] + b^2 (12 + b^2) (-2 Log[b] + Log[-2 I + b] + Log[2 I + b]))

The last line can be simplified to

1/96 (-4 (-6 + b^2) - 32 b ArcTan[2/b] + b^2 (12 + b^2) Log[1 + 4/b^2])

  • $\begingroup$ Thanks for the answer. But can you please provide me the steps for the solution of the integration. $\endgroup$ – Parveen Bano Jun 28 at 6:50
  • $\begingroup$ @ParveenBano you're on the wrong forum for that (this forum is about the Mathematica software). Maybe ask at the Mathematics StackExchange? $\endgroup$ – Roman Jun 28 at 6:56
  • $\begingroup$ Thanks for the suggestion $\endgroup$ – Parveen Bano Jun 28 at 7:42

Not the answer you're looking for? Browse other questions tagged or ask your own question.