OFFSET
0,8
LINKS
Vaclav Kotesovec, Table of n, a(n) for n = 0..1000
MATHEMATICA
Table[Max[CoefficientList[Product[(1 - x^(k^2)), {k, 1, n}], x]], {n, 0, 55}]
PROG
(PARI) a(n) = vecmax(Vec(prod(k=1, n, (1-x^k^2)))); \\ Michel Marcus, Jan 30 2024
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Jan 30 2024
STATUS
approved