A301742 a(n) = [x^n] 1/(1 - n*Sum_{k>=1} x^(k^3)).

1, 1, 4, 27, 256, 3125, 46656, 823543, 16777224, 387420651, 10000003000, 285311729175, 8916101692416, 302875135553107, 11112007563452544, 437893910883984375, 18446744692184842496, 827240282046275783406, 39346408782249049076832, 1978419682220092642678901, 104857601064960000960000000

Offset: 0

Author

Ilya Gutkovskiy, Mar 26 2018

Keywords

• nonn

Comments

Number of compositions (ordered partitions) of n into cubes of n kinds.

Links

• Index entries for sequences related to compositions
• Index entries for sequences related to sums of cubes

Crossrefs

Cf. A000578, A023358, A300975, A301335.

Programs

Mathematica

Table[SeriesCoefficient[1/(1 - n Sum[x^k^3, {k, 1, n}]), {x, 0, n}], {n, 0, 20}]