A369433 a(n) = [x^n] Product_{k=1..n} (x^(k^2) + 1 + 1/x^(k^2)).

1, 1, 0, 1, 3, 5, 7, 13, 35, 82, 168, 409, 1035, 2540, 6262, 16068, 41474, 107259, 279256, 736359, 1953946, 5205746, 13938670, 37567522, 101675407, 276158642, 752927255, 2060852216, 5658658210, 15582628517, 43032891276, 119166025289, 330808837377

Offset

0,5

Links

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

Mathematica

Table[Coefficient[Product[(x^(k^2) + 1 + 1/x^(k^2)), {k, 1, n}], x, n], {n, 0, 32}]

Crossrefs

Cf. A000290, A316706, A348165, A350249.

Sequence in context: A290482 A179633 A047933 * A075557 A244452 A057187

Adjacent sequences: A369430 A369431 A369432 * A369434 A369435 A369436

Keyword

nonn

Author

Ilya Gutkovskiy, Jan 23 2024

Status

approved