This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A292629 a(n) = n! * [x^n] exp(n*x)*BesselI(1,2*x). 5
 0, 1, 4, 30, 304, 3885, 59976, 1085973, 22571200, 529712667, 13856212600, 399773871068, 12612288989664, 431948624278795, 15960564546516240, 632898895109081310, 26809122466181751552, 1208177444352064438155, 57719104861915100554200, 2913802658820378870546498, 154991214138728849712151200 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,3 COMMENTS The n-th term of the n-th binomial transform of A138364. LINKS Seiichi Manyama, Table of n, a(n) for n = 0..386 N. J. A. Sloane, Transforms FORMULA a(n) = A292628(n,n). a(n) ~ BesselI(1,2) * n^n. - Vaclav Kotesovec, Sep 20 2017 a(n) = [x^(n-1)] (1+n*x+x^2)^n = [x^(n+1)] (1+n*x+x^2)^n. - Seiichi Manyama, May 01 2019 MATHEMATICA Table[n!*SeriesCoefficient[E^(n*x)*BesselI[1, 2*x], {x, 0, n}], {n, 0, 20}] (* Vaclav Kotesovec, Sep 20 2017 *) PROG (PARI) a(n) = polcoef((1+n*x+x^2)^n, n-1); \\ Michel Marcus, May 01 2019 CROSSREFS Main diagonal of A292628. Cf. A138364, A186925. Sequence in context: A054972 A052452 A307905 * A088794 A239841 A145348 Adjacent sequences:  A292626 A292627 A292628 * A292630 A292631 A292632 KEYWORD nonn AUTHOR Ilya Gutkovskiy, Sep 20 2017 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified October 15 22:25 EDT 2019. Contains 328038 sequences. (Running on oeis4.)