A297329 a(n) = [x^n] Product_{k>=1} 1/(1 - k*x^k)^n.

1, 1, 7, 37, 219, 1276, 7687, 46551, 285043, 1756243, 10883842, 67751289, 423366831, 2654041235, 16683909711, 105129718102, 663837626163, 4199521413019, 26610335585263, 168864540960165, 1073001606214814, 6826237566223329, 43474472693256491, 277152041235941803

Offset: 0

Author

Ilya Gutkovskiy, Dec 28 2017

Keywords

• nonn

Links

• Alois P. Heinz, Table of n, a(n) for n = 0..1000

Crossrefs

Main diagonal of A297328.

Cf. A297322, A297324, A297326.

Programs

Mathematica

Table[SeriesCoefficient[Product[1/(1 - k x^k)^n, {k, 1, n}], {x, 0, n}], {n, 0, 23}]

Formula

a(n) = A297328(n,n).

a(n) ~ c * d^n / sqrt(n), where d = 6.51548390811914394587815688142024783108478... and c = 0.2552310487728179222346375591994440863074... - Vaclav Kotesovec, Aug 01 2019