cp's OEIS Frontend

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.

A369985 Maximum of the absolute value of the coefficients of (1 - x) * (1 - x^3) * (1 - x^6) * ... * (1 - x^(n*(n+1)/2)).

This page as a plain text file.
%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