OFFSET
0,2
LINKS
Seiichi Manyama, Table of n, a(n) for n = 0..500
FORMULA
a(n) = Sum_{m=0..n} A193685(n,m).
E.g.f.: exp(exp(x)+5*x-1).
a(n) ~ exp(n/LambertW(n) - n - 1) * n^(n + 5) / LambertW(n)^(n + 11/2). - Vaclav Kotesovec, Jun 10 2020
a(0) = 1; a(n) = 5 * a(n-1) + Sum_{k=0..n-1} binomial(n-1,k) * a(k). - Ilya Gutkovskiy, Jul 03 2020
EXAMPLE
a(2) = 25 + 11 + 1 = 37.
MAPLE
b:= proc(n, m) option remember;
`if`(n=0, 1, m*b(n-1, m)+b(n-1, m+1))
end:
a:= n-> b(n, 5):
seq(a(n), n=0..23); # Alois P. Heinz, Aug 22 2021
MATHEMATICA
nmax = 20; CoefficientList[Series[E^(E^x + 5*x - 1), {x, 0, nmax}], x] * Range[0, nmax]! (* Vaclav Kotesovec, Jun 10 2020 *)
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Wolfdieter Lang, Oct 07 2011
STATUS
approved