A327063 Expansion of Product_{k>=1} (Product_{j=1..k} (1 + x^(k*j))^j).

1, 1, 1, 2, 4, 5, 8, 11, 15, 24, 34, 43, 63, 87, 115, 159, 217, 279, 380, 505, 657, 868, 1139, 1458, 1913, 2482, 3162, 4069, 5232, 6628, 8469, 10755, 13544, 17127, 21634, 27061, 33988, 42557, 52985, 66069, 82289, 101862, 126281, 156275, 192655, 237530, 292502

Offset

0,4

Links

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

Mathematica

nmax = 50; CoefficientList[Series[Product[Product[(1+x^(k*j))^j, {j, 1, Min[k, nmax/k]}], {k, 1, nmax}], {x, 0, nmax}], x]

Crossrefs

Cf. A028377, A192065, A211856, A294842, A280541, A327064, A327065, A327066.

Sequence in context: A330440 A222044 A288937 * A324926 A175106 A216566

Adjacent sequences: A327060 A327061 A327062 * A327064 A327065 A327066

Keyword

nonn

Author

Vaclav Kotesovec, Aug 19 2019

Status

approved