OFFSET
0,17
LINKS
FORMULA
EXAMPLE
a(31) = 3 because we have [28, 3], [21, 10] and [21, 6, 3, 1].
MATHEMATICA
nmax = 90; CoefficientList[Series[(1/2) (Product[(1 + x^(k (k + 1)/2)), {k, 1, nmax}] + Product[(1 - x^(k (k + 1)/2)), {k, 1, nmax}]), {x, 0, nmax}], x]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Dec 02 2020
STATUS
approved