OFFSET
0,3
FORMULA
a(n) = Sum_{k=0..n} binomial(n-1,k-1)*A000045(k)*n!/k!.
From Vaclav Kotesovec, Jan 27 2019: (Start)
D-finite with recurrence: a(n) = (4*n - 5)*a(n-1) - (6*n^2 - 22*n + 19)*a(n-2) + (n-3)*(n-2)*(4*n - 9)*a(n-3) - (n-4)*(n-3)^2*(n-2)*a(n-4).
a(n) ~ phi^(1/4) * n^(n - 1/4) / (sqrt(10) * exp(n - 2*sqrt(phi*n) + phi/2)), where phi = A001622 = (1+sqrt(5))/2 is the golden ratio. (End)
MATHEMATICA
FullSimplify[nmax = 21; CoefficientList[Series[2 Exp[x/(2 - 2 x)] Sinh[Sqrt[5] x/(2 - 2 x)]/Sqrt[5], {x, 0, nmax}], x] Range[0, nmax]!]
Table[Sum[Binomial[n - 1, k - 1] Fibonacci[k] n!/k!, {k, 0, n}], {n, 0, 21}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Jan 27 2019
STATUS
approved