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.

A359339 Maximal exponent of the powers of x corresponding to the maximal coefficient of the product x^2*(x^2 + x^3)*(x^2 + x^3 + x^5)*...*(x^2 + x^3 + x^5 + ... + x^prime(n)).

This page as a plain text file.
%I A359339 #8 Dec 31 2022 15:18:48
%S A359339 0,2,5,7,12,17,24,32,42,53,65,79,96,114,134,155,180,205,233,263,294,
%T A359339 329,364,403,442,485,529,576,625,676,729,785,842,902,964,1029,1097,
%U A359339 1167,1238,1313,1390,1469,1552,1636,1723,1813,1904,1999,2096,2195,2298,2402,2510
%N A359339 Maximal exponent of the powers of x corresponding to the maximal coefficient of the product x^2*(x^2 + x^3)*(x^2 + x^3 + x^5)*...*(x^2 + x^3 + x^5 + ... + x^prime(n)).
%t A359339 b[n_]:=CoefficientList[Product[Sum[x^Prime[i],{i,k}],{k,n}],x]; Table[Max[Position[b[n],Max[b[n]]]]-1,{n,0,52}]
%Y A359339 Cf. A000040, A359328.
%Y A359339 Cf. A359337 (exponents), A359338 (minimal exponent).
%K A359339 nonn
%O A359339 0,2
%A A359339 _Stefano Spezia_, Dec 27 2022