A298600 Expansion of Product_{k>=2} 1/(1 + x^(k^2)).
1, 0, 0, 0, -1, 0, 0, 0, 1, -1, 0, 0, -1, 1, 0, 0, 0, -1, 1, 0, 0, 1, -1, 0, 0, -1, 1, -1, 0, 1, -1, 1, 1, -1, 1, -1, -1, 1, -1, 1, 1, -1, 1, -1, -1, 1, -1, 1, 0, -2, 2, -1, 1, 2, -2, 1, -1, -2, 3, -2, 1, 2, -3, 2, -1, -1, 2, -3, 1, 1, -2, 3, 0, 0, 2, -3, 1, -1, -2, 3, -1, -2, 2
Offset: 0
Keywords
Links
Programs
-
Mathematica
nmax = 82; CoefficientList[Series[Product[1/(1 + x^k^2), {k, 2, Floor[Sqrt[nmax]] + 1}], {x, 0, nmax}], x]
Formula
G.f.: Product_{k>=2} 1/(1 + x^(k^2)).
Comments