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

1, -1, -4, 9, 48, 100, -756, -3479, -1600, 24462, 225900, 364573, -643536, -9251736, -36989316, -32397975, 165039872, 1725828525, 5338814652, 8082713829, -26321848400, -233434232766, -811526778964, -1731126953532, 1151302859712, 23632432765000, 113461901639788, 287935019845749

Offset

0,3

Links

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

Mathematica

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

Crossrefs

Cf. A073592, A266964, A292132, A297324, A298985, A298987, A298988.

Sequence in context: A048892 A108849 A025558 * A103933 A256880 A327699

Adjacent sequences: A298983 A298984 A298985 * A298987 A298988 A298989

Keyword

sign

Author

Ilya Gutkovskiy, Jan 31 2018

Status

approved