OFFSET
0,10
MATHEMATICA
Table[SeriesCoefficient[1/(1 - Sum[x^(k (k + 1)/2), {k, 1, Floor[(Sqrt[1 + 8 Sqrt[n]] - 1)/2]}]), {x, 0, n}], {n, 0, 43}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Jan 20 2024
STATUS
approved