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

1, 0, -1, -2, -4, -2, -5, 6, 7, 18, 31, 50, 17, 34, 39, -122, -134, -296, -298, -556, -670, -692, 64, 26, 1119, 1054, 3953, 6804, 6645, 9250, 8644, 9702, 2817, 11386, -12415, -36382, -47757, -71782, -122506, -99540, -191083, -176382, -253722, -166706, -21024

Offset

0,4

Comments

Convolution of A022661 and A000041.

Links

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

Mathematica

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

Crossrefs

Cf. A000041, A022661, A267004.

Sequence in context: A189326 A106688 A167977 * A347796 A011169 A279481

Adjacent sequences: A267002 A267003 A267004 * A267006 A267007 A267008

Keyword

sign

Author

Vaclav Kotesovec, Jan 08 2016

Status

approved