OFFSET
0,3
MATHEMATICA
T[n_, k_]:=Sum[(-1)^j*Binomial[n, Floor[(n+(k+2)j)/2]], {j, Floor[-n/(k+2)], Ceiling[n/(k+2)]}]; Table[Sum[T[n-k, k], {k, 0, n}], {n, 0, 39}]
PROG
(PARI) T(n, k) = sum(j=floor(-n/(k+2)), ceil(n/(k+2)), (-1)^j*binomial(n, floor((n+(k+2)*j)/2))); \\ A068914
a(n) = sum(k=0, n, T(n-k, k)); \\ Michel Marcus, May 09 2020
CROSSREFS
KEYWORD
nonn
AUTHOR
Stefano Spezia, May 08 2020
STATUS
approved