login
A357382
Expansion of Product_{k>=1} (1 - x^Lucas(k)).
2
1, -1, 0, -1, 0, 1, 0, 0, 0, 0, 1, -1, 0, 0, 0, 1, -1, 0, -1, 1, 0, 0, 0, 0, 0, 1, -1, 0, -1, 0, 1, 0, 1, -1, 0, 0, 0, 0, 0, 0, 1, -1, 0, -1, 0, 1, 0, 0, 0, 0, 1, 0, -1, 0, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1, 0, -1, 0, 1, 0, 0, 0, 0, 1, -1, 0, 0, 0, 1, -1, 0, 0, 0, 0, -1, 0, 1, 0, 1, -1
OFFSET
0
COMMENTS
Convolution inverse of A067592.
MATHEMATICA
nmax = 100; CoefficientList[Series[Product[(1 - x^LucasL[k]), {k, 1, 20}], {x, 0, nmax}], x]
CROSSREFS
KEYWORD
sign
AUTHOR
Ilya Gutkovskiy, Sep 26 2022
STATUS
approved