login
A357383
Expansion of Product_{k>=1} 1 / (1 + x^Lucas(k)).
2
1, -1, 1, -2, 1, -1, 2, -2, 3, -4, 4, -5, 5, -5, 7, -7, 8, -10, 9, -10, 11, -11, 14, -15, 16, -18, 17, -18, 20, -21, 24, -26, 27, -29, 29, -31, 35, -36, 40, -43, 43, -46, 48, -51, 56, -59, 63, -67, 68, -72, 77, -80, 86, -91, 94, -99, 103, -108, 116, -121, 127, -134, 137, -143, 151
OFFSET
0,4
COMMENTS
Convolution inverse of A003263.
MATHEMATICA
nmax = 64; CoefficientList[Series[Product[1/(1 + x^LucasL[k]), {k, 1, 20}], {x, 0, nmax}], x]
CROSSREFS
KEYWORD
sign
AUTHOR
Ilya Gutkovskiy, Sep 26 2022
STATUS
approved