[go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A294606
Expansion of Product_{k>=1} (1 - k*x^k)^(k^k).
4
1, -1, -8, -73, -919, -13977, -253640, -5290184, -124681406, -3272865905, -94671665085, -2991846831531, -102566663464544, -3791541404744714, -150357943095635464, -6367699625807475503, -286854179220742344135, -13697182490105378305606
OFFSET
0,3
LINKS
FORMULA
a(0) = 1 and a(n) = -(1/n) * Sum_{k=1..n} A294608(k) * a(n-k) for n > 0.
MATHEMATICA
nmax = 20; CoefficientList[Series[Product[(1 - k*x^k)^(k^k), {k, 1, nmax}], {x, 0, nmax}], x] (* Vaclav Kotesovec, Nov 05 2017 *)
PROG
(PARI) N=66; x='x+O('x^N); Vec(prod(k=1, N, (1-k*x^k)^k^k))
CROSSREFS
Column k=1 of A294605.
Cf. A294608.
Sequence in context: A152429 A234281 A176734 * A294809 A225161 A195754
KEYWORD
sign
AUTHOR
Seiichi Manyama, Nov 04 2017
STATUS
approved