A292631 a(n) = n! * [x^n] exp(n*x)*(BesselI(0,2*x) + BesselI(1,2*x)).

1, 2, 10, 75, 758, 9660, 148772, 2688420, 55784710, 1307378358, 34158527852, 984547901051, 31034429035260, 1062081192039140, 39218355263626632, 1554260970293874135, 65803396940022289734, 2964120950479432183950, 141548149894016562758300, 7143010414313948156920665, 379821534884560034711455956

Offset

0,2

Comments

The n-th term of the n-th binomial transform of A001405.

Links

Table of n, a(n) for n=0..20.

N. J. A. Sloane, Transforms

Formula

a(n) = A292630(n,n).

a(n) ~ (BesselI(0,2) + BesselI(1,2)) * n^n. - Vaclav Kotesovec, Sep 20 2017

Mathematica

Table[n!*SeriesCoefficient[E^(n*x)*(BesselI[0, 2*x] + BesselI[1, 2*x]), {x, 0, n}], {n, 0, 20}] (* Vaclav Kotesovec, Sep 20 2017 *)

Crossrefs

Main diagonal of A292630.

Cf. A001405, A186925, A292629, A292632.

Sequence in context: A352270 A136222 A184356 * A295098 A124426 A321394

Adjacent sequences: A292628 A292629 A292630 * A292632 A292633 A292634

Keyword

nonn

Author

Ilya Gutkovskiy, Sep 20 2017

Status

approved