A357427 Expansion of Product_{k>=0} 1 / (1 + x^Lucas(k)).

1, -1, 0, -1, 1, 0, 1, -2, 2, -2, 2, -3, 3, -2, 4, -5, 4, -5, 5, -5, 6, -6, 8, -9, 8, -9, 9, -9, 11, -12, 13, -14, 14, -15, 15, -16, 20, -20, 20, -23, 23, -23, 25, -28, 31, -31, 32, -36, 36, -36, 41, -44, 45, -47, 49, -52, 54, -56, 62, -65, 65, -69, 72, -74, 79, -83, 87, -91

Offset

0,8

Comments

Convolution inverse of A067595.

Links

Table of n, a(n) for n=0..67.

Mathematica

nmax = 67; CoefficientList[Series[Product[1/(1 + x^LucasL[k]), {k, 0, 20}], {x, 0, nmax}], x]

Crossrefs

Cf. A000032, A067595, A357383.

Sequence in context: A350226 A362136 A224713 * A168557 A328204 A194320

Adjacent sequences: A357424 A357425 A357426 * A357428 A357429 A357430

Keyword

sign

Author

Ilya Gutkovskiy, Sep 28 2022

Status

approved