A259906 n*a(n+1) = (2*n^2+2n-1)*a(n) + (n+1)*a(n-1); a(0)=0, a(1)=1.

0, 1, 5, 34, 290, 3015, 37131, 529540, 8590724, 156302605, 3152964305, 69852444006, 1686248475750, 44058654556819, 1238847414761495, 37301117245210120, 1197443930238816776, 40827566310832732185, 1473461890546162560669, 56116506599112620887210

Offset

0,3

Links

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

Formula

a(n) ~ (BesselI(0,1) + BesselI(1,1)) * 2^(n-1) * n!. - Vaclav Kotesovec, Jul 09 2015

Mathematica

RecurrenceTable[{a[0]==0, a[1]==1, (n)*a[n+1]== (2n^2 +2*n+1)*a[n] + (n+1)*a[n-1]}, a, {n, 30}]

Crossrefs

Sequence in context: A289147 A284864 A208677 * A355258 A334066 A330649

Adjacent sequences: A259903 A259904 A259905 * A259907 A259908 A259909

Keyword

nonn,easy

Author

G. C. Greubel, Jul 07 2015

Status

approved