|
| |
|
|
A065141
|
|
(n+1)*2^n*(2*n)!.
|
|
1
| |
|
|
1, 8, 288, 23040, 3225600, 696729600, 214592716800, 89270570188800, 48206107901952000, 32780153373327360000, 27404208220101672960000, 27623441885862486343680000, 33037636495491533667041280000
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=0,...,100
|
|
|
FORMULA
| Integral representation as n-th moment of a positive function on a positive half-axis, in Maple notation: a(n)=int(x^n*1/8*exp(-1/(sqrt(2))*sqrt(x))*(x+sqrt(2)*sqrt(x))/x, x=0..infinity), n=0, 1...
Hypergeometric generating function: exp(4*x)*(BesselI(0, 4*x)+4*x*BesselI(0, 4*x)+4*x*BesselI(1, 4*x)), i.e. a(0)=1 and a(n)= evalf(limit(n!^2*diff(exp(4*x)*(BesselI(0, 4*x)+4*x*BesselI(0, 4*x)+4*x*BesselI(1, 4*x)), x$n), x=0)), n=1, 2...
|
|
|
PROG
| (PARI) { for (n=0, 100, write("b065141.txt", n, " ", (n + 1)*2^n*(2*n)!) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Oct 11 2009]
|
|
|
CROSSREFS
| Sequence in context: A054607 A132592 A034977 * A190840 A000842 A202559
Adjacent sequences: A065138 A065139 A065140 * A065142 A065143 A065144
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Karol A. Penson (penson(AT)lptl.jussieu.fr), Oct 16 2001
|
| |
|
|
