login
A306702
Expansion of Sum_{k>=0} x^k / Product_{j=1..k} (1 + j*x^j).
1
1, 1, 0, 1, -2, 1, -1, 1, -7, 10, 0, 4, -31, 31, 8, 53, -163, 108, -74, 212, -450, 732, -353, 467, -3412, 3614, -145, 5613, -11910, 8816, -13354, 21558, -44624, 77598, -43860, 67721, -255791, 261710, -127452, 529648, -1118393, 997295, -1206756, 2184148, -3314638, 5934992, -5394856
OFFSET
0,5
MATHEMATICA
nmax = 46; CoefficientList[Series[Sum[x^k/Product[(1 + j x^j), {j, 1, k}], {k, 0, nmax}], {x, 0, nmax}], x]
CROSSREFS
Sequence in context: A011127 A172970 A172971 * A240581 A329043 A329042
KEYWORD
sign
AUTHOR
Ilya Gutkovskiy, Mar 05 2019
STATUS
approved