OFFSET
0,3
MAPLE
T := (n, k) -> add(combinat:-eulerian1(n, j)*binomial(n-j, n-k), j=0..n):
a := n -> add((-1)^(n-j)*T(n, j)*binomial(n, j), j=0..n): seq(a(n), n=0..22);
PROG
(PARI) T(n, j) = stirling(n, k, 2)*(k-1)!; \\ A028246
a(n) = sum(j=0, n, (-1)^(n-j)*binomial(n, j)*T(n+1, j+1)); \\ Michel Marcus, May 04 2021
CROSSREFS
KEYWORD
sign
AUTHOR
Peter Luschny, Apr 28 2021
STATUS
approved