[go: up one dir, main page]

login
A280453
G.f.: Product_{k>=1, j>=1} 1/(1 - x^(j^2*k^2)).
2
1, 1, 1, 1, 3, 3, 3, 3, 6, 8, 8, 8, 12, 16, 16, 16, 24, 30, 33, 33, 45, 53, 59, 59, 75, 93, 102, 106, 126, 154, 166, 174, 204, 242, 270, 282, 331, 379, 423, 439, 507, 583, 643, 681, 768, 886, 962, 1022, 1138, 1300, 1425, 1507, 1687, 1893, 2086, 2190, 2434
OFFSET
0,5
LINKS
MATHEMATICA
nmax = 100; CoefficientList[Series[Product[1/(1-x^(j^2*k^2)), {k, 1, Sqrt[nmax]+1}, {j, 1, Floor[Sqrt[nmax/k^2]] + 1}], {x, 0, nmax}], x]
CROSSREFS
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Jan 03 2017
STATUS
approved