OFFSET
0,3
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..445
FORMULA
Convolution inverse of A077365.
a(n) ~ -n! * (1 - 1/n - 2/n^2 - 6/n^3 - 32/n^4 - 222/n^5 - 1916/n^6 - 19650/n^7 - 231200/n^8 - 3058566/n^9 - 44883428/n^10). - Vaclav Kotesovec, Sep 14 2017
G.f.: exp(-Sum_{k>=1} Sum_{j>=1} (j!)^k*x^(j*k)/k). - Ilya Gutkovskiy, Jun 18 2018
MATHEMATICA
nmax = 25; CoefficientList[Series[Product[(1 - k!*x^k), {k, 1, nmax}], {x, 0, nmax}], x] (* Vaclav Kotesovec, Sep 13 2017 *)
PROG
(PARI) {a(n) = polcoeff(prod(k=1, n, 1-k!*x^k+x*O(x^n)), n)}
CROSSREFS
KEYWORD
sign
AUTHOR
Seiichi Manyama, Sep 13 2017
STATUS
approved