OFFSET
0,11
LINKS
FORMULA
EXAMPLE
a(28) = 3 because we have [28], [21, 6, 1] and [15, 10, 3].
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