A307262 Expansion of Product_{k>=1} (1 + k*x^k/(1 - x)^k).

1, 1, 3, 10, 29, 82, 231, 646, 1780, 4835, 13009, 34794, 92600, 245119, 644983, 1686869, 4387030, 11353686, 29261059, 75134965, 192261744, 490305251, 1246128051, 3156425284, 7969135647, 20057905672, 50339682075, 126002008265, 314604617989, 783668652379, 1947689149020

Offset

0,3

Comments

First differences of the binomial transform of A022629.

Links

Table of n, a(n) for n=0..30.

Maple

a:=series(mul(1+k*x^k/(1-x)^k, k=1..100), x=0, 31): seq(coeff(a, x, n), n=0..30); # Paolo P. Lava, Apr 03 2019

Mathematica

nmax = 30; CoefficientList[Series[Product[(1 + k x^k/(1 - x)^k), {k, 1, nmax}], {x, 0, nmax}], x]

Crossrefs

Cf. A022629, A129519, A307259, A307261, A320564.

Sequence in context: A048493 A269144 A096140 * A291393 A244615 A307062

Adjacent sequences: A307259 A307260 A307261 * A307263 A307264 A307265

Keyword

nonn

Author

Ilya Gutkovskiy, Apr 01 2019

Status

approved