OFFSET
1,2
COMMENTS
Total number of smallest parts in all partitions of n into cubes (A000578).
FORMULA
G.f.: Sum_{i>=1} x^(i^3)/(1 - x^(i^3)) * Product_{j>=i} 1/(1 - x^(j^3)).
EXAMPLE
a(10) = 12 because we have [8, 1, 1], [1, 1, 1, 1, 1, 1, 1, 1, 1, 1] and 2 + 10 = 12.
MATHEMATICA
nmax = 70; Rest[CoefficientList[Series[Sum[x^i^3/(1 - x^i^3) Product[1/(1 - x^j^3), {j, i, nmax}], {i, 1, nmax}], {x, 0, nmax}], x]]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Apr 03 2017
STATUS
approved