0,2

Number of partitions of n into cubes of 2 kinds.

Self-convolution of A003108.

Vaclav Kotesovec, Table of n, a(n) for n = 0..10000

G.f.: Product_{k>=1} 1/(1 - x^(k^3))^2.

a(n) ~ exp(2^(11/4) * (Gamma(1/3) * Zeta(4/3))^(3/4) * n^(1/4) / 3^(3/2)) * (Gamma(1/3) * Zeta(4/3))^(9/8) / (2^(27/8) * 3^(7/4) * Pi^(7/2) * n^(13/8)). - Vaclav Kotesovec, Apr 08 2018

a(8) = 11 because we have [8a], [8b], [1a, 1a, 1a, 1a, 1a, 1a, 1a, 1a], [1a, 1a, 1a, 1a, 1a, 1a, 1a, 1b], [1a, 1a, 1a, 1a, 1a, 1a, 1b, 1b], [1a, 1a, 1a, 1a, 1a, 1b, 1b, 1b], [1a, 1a, 1a, 1a, 1b, 1b, 1b, 1b], [1a, 1a, 1a, 1b, 1b, 1b, 1b, 1b], [1a, 1a, 1b, 1b, 1b, 1b, 1b, 1b], [1a, 1b, 1b, 1b, 1b, 1b, 1b, 1b] and [1b, 1b, 1b, 1b, 1b, 1b, 1b, 1b].

nmax = 60; CoefficientList[Series[Product[1/(1 - x^(k^3))^2, {k, 1, Floor[nmax^(1/3) + 1]}], {x, 0, nmax}], x] (* Vaclav Kotesovec, Apr 08 2018 *)

Cf. A000578, A000712, A003108, A279225.

Sequence in context: A351914 A258946 A008815 * A200371 A246025 A211699

Adjacent sequences: A298431 A298432 A298433 * A298435 A298436 A298437

Ilya Gutkovskiy, Jan 19 2018

approved