OFFSET
0,3
FORMULA
a(0) = 1; a(n) = n*a(n-1) + (-1)^n * binomial(n+3,4).
a(n) = n! + (-1)^n * A368586(n).
E.g.f.: (1 - x * (1-3*x/2+x^2/2-x^3/24) * exp(-x)) / (1-x).
PROG
(PARI) my(N=30, x='x+O('x^N)); Vec(serlaplace((1-x*sum(k=0, 3, binomial(3, k)*(-x)^k/(k+1)!)*exp(-x))/(1-x)))
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Jan 04 2024
STATUS
approved