QPMS
/
qpms
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity
qpms/besseltransforms/5-2-0

10 lines
15 KiB
Plaintext
Raw Normal View History

Bessel transform mathematica results etc. Former-commit-id: 3dca9d0ccbfefa4c5f3867ce4ba31229646ca2d9
2018-01-15 15:14:15 +02:00
Integrate[(E^(-(c*x) + I*k0*x)*(1 - E^(-(c*x)))^5*BesselJ[0, k*x])/(k0^2*x), {x, 0, Infinity}, Assumptions -> n == 0 && q == 2 && κ == 5 && c >= 0 && k >= 0 && k0 >= 0 && n >= 0]
-6 c x + I k0 x Pi -5 c x + I k0 x Pi -4 c x + I k0 x Pi -3 c x + I k0 x Pi -2 c x + I k0 x Pi -(c x) + I k0 x Pi -6 c x + I k0 x Pi -5 c x + I k0 x Pi -4 c x + I k0 x Pi -3 c x + I k0 x Pi -2 c x + I k0 x Pi -(c x) + I k0 x Pi -6 c x + I k0 x Pi -5 c x + I k0 x Pi -4 c x + I k0 x Pi -3 c x + I k0 x Pi -2 c x + I k0 x Pi -(c x) + I k0 x Pi -6 c x + I k0 x Pi -5 c x + I k0 x Pi -4 c x + I k0 x Pi -3 c x + I k0 x Pi -2 c x + I k0 x Pi -(c x) + I k0 x Pi -6 c x + I k0 x 2 Pi -5 c x + I k0 x 2 Pi -4 c x + I k0 x 2 Pi -3 c x + I k0 x 2 Pi -2 c x + I k0 x 2 Pi -(c x) + I k0 x 2 Pi -6 c x + I k0 x Pi -5 c x + I k0 x Pi -4 c x + I k0 x Pi -3 c x + I k0 x Pi -2 c x + I k0 x Pi -(c x) + I k0 x Pi -6 c x + I k0 x Pi -5 c x + I k0 x Pi -4 c x + I k0 x Pi -3 c x + I k0 x Pi -2 c x + I k0 x Pi -(c x) + I k0 x Pi -6 c x + I k0 x Pi -5 c x + I k0 x Pi -4 c x + I k0 x Pi -3 c x + I k0 x Pi -2 c x + I k0 x Pi -(c x) + I k0 x Pi -6 c x + I k0 x Pi -5 c x + I k0 x Pi -4 c x + I k0 x Pi -3 c x + I k0 x Pi -2 c x + I k0 x Pi -(c x) + I k0 x Pi -6 c x + I k0 x Pi -5 c x + I k0 x Pi -4 c x + I k0 x Pi -3 c x + I k0 x Pi -2 c x + I k0 x Pi -(c x) + I k0 x Pi
-13043905875 E Cos[-- - k x] 65219529375 E Cos[-- - k x] 65219529375 E Cos[-- - k x] 65219529375 E Cos[-- - k x] 65219529375 E Cos[-- - k x] 13043905875 E Cos[-- - k x] 2401245 E Cos[-- - k x] 12006225 E Cos[-- - k x] 12006225 E Cos[-- - k x] 12006225 E Cos[-- - k x] 12006225 E Cos[-- - k x] 2401245 E Cos[-- - k x] 3675 E Cos[-- - k x] 18375 E Cos[-- - k x] 18375 E Cos[-- - k x] 18375 E Cos[-- - k x] 18375 E Cos[-- - k x] 3675 E Cos[-- - k x] 9 E Cos[-- - k x] 45 E Cos[-- - k x] 45 E Cos[-- - k x] 45 E Cos[-- - k x] 45 E Cos[-- - k x] 9 E Cos[-- - k x] E Sqrt[--] Cos[-- - k x] 5 E Sqrt[--] Cos[-- - k x] 10 E Sqrt[--] Cos[-- - k x] 10 E Sqrt[--] Cos[-- - k x] 5 E Sqrt[--] Cos[-- - k x] E Sqrt[--] Cos[-- - k x] 418854310875 E Sin[-- - k x] 2094271554375 E Sin[-- - k x] 2094271554375 E Sin[-- - k x] 2094271554375 E Sin[-- - k x] 2094271554375 E Sin[-- - k x] 418854310875 E Sin[-- - k x] 57972915 E Sin[-- - k x] 289864575 E Sin[-- - k x] 289864575 E Sin[-- - k x] 289864575 E Sin[-- - k x] 289864575 E Sin[-- - k x] 57972915 E Sin[-- - k x] 59535 E Sin[-- - k x] 297675 E Sin[-- - k x] 297675 E Sin[-- - k x] 297675 E Sin[-- - k x] 297675 E Sin[-- - k x] 59535 E Sin[-- - k x] 75 E Sin[-- - k x] 375 E Sin[-- - k x] 375 E Sin[-- - k x] 375 E Sin[-- - k x] 375 E Sin[-- - k x] 75 E Sin[-- - k x] E Sin[-- - k x] 5 E Sin[-- - k x] 5 E Sin[-- - k x] 5 E Sin[-- - k x] 5 E Sin[-- - k x] E Sin[-- - k x]
4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 Pi 4 Pi 4 Pi 4 Pi 4 Pi 4 Pi 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4
Integrate::idiv: Integral of ------------------------------------------- + ------------------------------------------ - ------------------------------------------ + ------------------------------------------ - ------------------------------------------ + ------------------------------------------ + -------------------------------------- - --------------------------------------- + --------------------------------------- - --------------------------------------- + --------------------------------------- - -------------------------------------- - ----------------------------------- + ------------------------------------ - ------------------------------------ + ------------------------------------ - ------------------------------------ + ----------------------------------- + -------------------------------- - --------------------------------- + --------------------------------- - --------------------------------- + --------------------------------- - -------------------------------- - --------------------------------------- + ----------------------------------------- - ------------------------------------------ + ------------------------------------------ - ----------------------------------------- + --------------------------------------- + ------------------------------------------- - -------------------------------------------- + -------------------------------------------- - -------------------------------------------- + -------------------------------------------- - ------------------------------------------- - --------------------------------------- + ---------------------------------------- - ---------------------------------------- + ---------------------------------------- - ---------------------------------------- + --------------------------------------- + ------------------------------------ - ------------------------------------- + ------------------------------------- - ------------------------------------- + ------------------------------------- - ------------------------------------ - --------------------------------- + ---------------------------------- - ---------------------------------- + ---------------------------------- - ---------------------------------- + --------------------------------- + ------------------------------ - -------------------------------- + -------------------------------- - -------------------------------- + -------------------------------- - ------------------------------ does not converge on {0, Infinity}.
17/2 2 19/2 17/2 2 19/2 17/2 2 19/2 17/2 2 19/2 17/2 2 19/2 17/2 2 19/2 13/2 2 15/2 13/2 2 15/2 13/2 2 15/2 13/2 2 15/2 13/2 2 15/2 13/2 2 15/2 9/2 2 11/2 9/2 2 11/2 9/2 2 11/2 9/2 2 11/2 9/2 2 11/2 9/2 2 11/2 5/2 2 7/2 5/2 2 7/2 5/2 2 7/2 5/2 2 7/2 5/2 2 7/2 5/2 2 7/2 2 3/2 2 3/2 2 3/2 2 3/2 2 3/2 2 3/2 19/2 2 21/2 19/2 2 21/2 19/2 2 21/2 19/2 2 21/2 19/2 2 21/2 19/2 2 21/2 15/2 2 17/2 15/2 2 17/2 15/2 2 17/2 15/2 2 17/2 15/2 2 17/2 15/2 2 17/2 11/2 2 13/2 11/2 2 13/2 11/2 2 13/2 11/2 2 13/2 11/2 2 13/2 11/2 2 13/2 7/2 2 9/2 7/2 2 9/2 7/2 2 9/2 7/2 2 9/2 7/2 2 9/2 7/2 2 9/2 3/2 2 5/2 3/2 2 5/2 3/2 2 5/2 3/2 2 5/2 3/2 2 5/2 3/2 2 5/2
1073741824 k k0 Sqrt[2 Pi] x 1073741824 k k0 Sqrt[2 Pi] x 536870912 k k0 Sqrt[2 Pi] x 536870912 k k0 Sqrt[2 Pi] x 1073741824 k k0 Sqrt[2 Pi] x 1073741824 k k0 Sqrt[2 Pi] x 2097152 k k0 Sqrt[2 Pi] x 2097152 k k0 Sqrt[2 Pi] x 1048576 k k0 Sqrt[2 Pi] x 1048576 k k0 Sqrt[2 Pi] x 2097152 k k0 Sqrt[2 Pi] x 2097152 k k0 Sqrt[2 Pi] x 16384 k k0 Sqrt[2 Pi] x 16384 k k0 Sqrt[2 Pi] x 8192 k k0 Sqrt[2 Pi] x 8192 k k0 Sqrt[2 Pi] x 16384 k k0 Sqrt[2 Pi] x 16384 k k0 Sqrt[2 Pi] x 64 k k0 Sqrt[2 Pi] x 64 k k0 Sqrt[2 Pi] x 32 k k0 Sqrt[2 Pi] x 32 k k0 Sqrt[2 Pi] x 64 k k0 Sqrt[2 Pi] x 64 k k0 Sqrt[2 Pi] x Sqrt[k] k0 x Sqrt[k] k0 x Sqrt[k] k0 x Sqrt[k] k0 x Sqrt[k] k0 x Sqrt[k] k0 x 8589934592 k k0 Sqrt[2 Pi] x 8589934592 k k0 Sqrt[2 Pi] x 4294967296 k k0 Sqrt[2 Pi] x 4294967296 k k0 Sqrt[2 Pi] x 8589934592 k k0 Sqrt[2 Pi] x 8589934592 k k0 Sqrt[2 Pi] x 16777216 k k0 Sqrt[2 Pi] x 16777216 k k0 Sqrt[2 Pi] x 8388608 k k0 Sqrt[2 Pi] x 8388608 k k0 Sqrt[2 Pi] x 16777216 k k0 Sqrt[2 Pi] x 16777216 k k0 Sqrt[2 Pi] x 131072 k k0 Sqrt[2 Pi] x 131072 k k0 Sqrt[2 Pi] x 65536 k k0 Sqrt[2 Pi] x 65536 k k0 Sqrt[2 Pi] x 131072 k k0 Sqrt[2 Pi] x 131072 k k0 Sqrt[2 Pi] x 512 k k0 Sqrt[2 Pi] x 512 k k0 Sqrt[2 Pi] x 256 k k0 Sqrt[2 Pi] x 256 k k0 Sqrt[2 Pi] x 512 k k0 Sqrt[2 Pi] x 512 k k0 Sqrt[2 Pi] x 4 k k0 Sqrt[2 Pi] x 4 k k0 Sqrt[2 Pi] x 2 k k0 Sqrt[2 Pi] x 2 k k0 Sqrt[2 Pi] x 4 k k0 Sqrt[2 Pi] x 4 k k0 Sqrt[2 Pi] x
Series[Integrate[(E^(-(c*x) + I*k0*x)*(1 - E^(-(c*x)))^5*BesselJ[0, k*x])/(k0^2*x), {x, 0, Infinity}, Assumptions -> n == 0 && q == 2 && κ == 5 && c >= 0 && k >= 0 && k0 >= 0 && n >= 0], {k, Infinity, 10}]