This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A369985 #7 Feb 07 2024 11:52:26 %S A369985 1,1,1,1,2,2,2,3,3,5,4,5,4,8,10,9,14,16,26,36,47,51,82,48,43,49,56,94, %T A369985 147,152,174,120,214,268,370,580,519,598,1024,1217,1750,2473,2417, %U A369985 3340,4795,7086,12978,4808,5675,9373,13083,9644,8762,9516,10702,14483 %N A369985 Maximum of the absolute value of the coefficients of (1 - x) * (1 - x^3) * (1 - x^6) * ... * (1 - x^(n*(n+1)/2)). %t A369985 Table[Max[Abs[CoefficientList[Product[(1 - x^(k (k + 1)/2)), {k, 1, n}], x]]], {n, 0, 55}] %o A369985 (PARI) a(n) = vecmax(apply(abs, Vec(prod(i=1, n, (1-x^(i*(i+1)/2)))))); \\ _Michel Marcus_, Feb 07 2024 %Y A369985 Cf. A000217, A160089, A292518, A359348, A369984. %K A369985 nonn %O A369985 0,5 %A A369985 _Ilya Gutkovskiy_, Feb 07 2024