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.

A369706 Maximal coefficient of (1 + x^2) * (1 + x^3) * (1 + x^4) * ... * (1 + x^n).

This page as a plain text file.
%I A369706 #10 Jan 29 2024 19:27:58
%S A369706 1,1,1,1,1,2,3,4,7,12,20,35,62,112,199,361,657,1206,2221,4110,7636,
%T A369706 14234,26618,49910,93846,176906,334184,632602,1199892,2280164,4340064,
%U A369706 8273610,15796439,30202620,57820648,110826888,212681976,408610024,785833480,1512776590,2915017360
%N A369706 Maximal coefficient of (1 + x^2) * (1 + x^3) * (1 + x^4) * ... * (1 + x^n).
%F A369706 a(n) ~ A025591(n)/2. - _Vaclav Kotesovec_, Jan 29 2024
%p A369706 b:= proc(n) option remember; `if`(n<2, 1, expand(b(n-1)*(1+x^n))) end:
%p A369706 a:= n-> max(coeffs(b(n))):
%p A369706 seq(a(n), n=0..40);  # _Alois P. Heinz_, Jan 29 2024
%t A369706 Table[Max[CoefficientList[Product[(1 + x^k), {k, 2, n}], x]], {n, 0, 40}]
%o A369706 (PARI) a(n) = vecmax(Vec(prod(i=2, n, 1+x^i))); \\ _Michel Marcus_, Jan 29 2024
%Y A369706 Cf. A025147, A025591.
%K A369706 nonn
%O A369706 0,6
%A A369706 _Ilya Gutkovskiy_, Jan 29 2024