OFFSET
0,5
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..449
FORMULA
a(n) = Sum_{k=0..n} A134832(n,k)*(-1)^k for n>=0.
MATHEMATICA
A000757[n_] := (-1)^n + Sum[(-1)^k*n!/((n - k)*k!), {k, 0, n - 1}]; a[n_, n_] = 1; a[n_, 0] := A000757[n]; a[n_, k_] := a[n, k] = n/k*a[n - 1, k - 1]; Table[Sum[a[n, k]*(-1)^k, {k, 0, n}], {n, 0, 10}] (* G. C. Greubel, Nov 10 2016 *)
CROSSREFS
KEYWORD
sign,easy
AUTHOR
Wolfdieter Lang, Jan 21 2008
STATUS
approved