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

Author

Ilya Gutkovskiy, Jan 31 2018

Keywords

• sign

Crossrefs

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

Programs

Mathematica

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