A294256 E.g.f.: exp((1-x)*(1-x^2)*(1-x^3) - 1).

1, -1, -1, 5, 25, -41, -1769, 7181, 74705, -236305, -7562609, -4169771, 1339186729, -2144219065, -174083994265, -370106105251, 35885107199521, 252732128552671, -10892824509622625, -56149731134394715, 2589936417283432121, 31565855231279227319

Offset

0,4

Links

Seiichi Manyama, Table of n, a(n) for n = 0..491

Mathematica

With[{nn=30}, CoefficientList[Series[Exp[(1-x)(1-x^2)(1-x^3)-1], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Mar 01 2026 *)

Prog

(PARI) N=66; x='x+O('x^N); Vec(serlaplace(exp((1-x)*(1-x^2)*(1-x^3)-1)))

Crossrefs

Column k=3 of A294254.

Sequence in context: A070388 A250314 A293571 * A056872 A029490 A223654

Adjacent sequences: A294253 A294254 A294255 * A294257 A294258 A294259

Keyword

sign

Author

Seiichi Manyama, Oct 26 2017

Status

approved