|
|
A368766
|
|
a(n) = n! * (1 + Sum_{k=0..n} (-1)^k * binomial(k+1,2) / k!).
|
|
4
|
|
|
1, 0, 3, 3, 22, 95, 591, 4109, 32908, 296127, 2961325, 32574509, 390894186, 5081624327, 71142740683, 1067141110125, 17074257762136, 290262381956159, 5224722875211033, 99269734629009437, 1985394692580188950, 41693288544183967719, 917252347972047290071
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
a(0) = 1; a(n) = n*a(n-1) + (-1)^n * binomial(n+1,2).
E.g.f.: (1 - x * (1-x/2) * exp(-x)) / (1-x).
|
|
PROG
|
(PARI) my(N=30, x='x+O('x^N)); Vec(serlaplace((1-x*sum(k=0, 1, binomial(1, k)*(-x)^k/(k+1)!)*exp(-x))/(1-x)))
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|