OFFSET
0,3
COMMENTS
Convolution inverse of A000294 (Euler transform of the triangular numbers).
FORMULA
G.f.: Product_{k>=1} (1 - x^k)^(k*(k+1)/2).
MATHEMATICA
nmax = 41; CoefficientList[Series[Product[(1 - x^k)^(k (k + 1)/2), {k, 1, nmax}], {x, 0, nmax}], x]
PROG
(SageMath) # uses[EulerTransform from A166861]
b = EulerTransform(lambda n: -binomial(n+1, 2))
print([b(n) for n in range(37)]) # Peter Luschny, Nov 11 2020
CROSSREFS
KEYWORD
sign
AUTHOR
Ilya Gutkovskiy, Sep 15 2017
STATUS
approved