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 A122893 #8 Nov 09 2018 07:17:43
%S A122893 1,1,2,5,9,19,37,74,147,294,587,1175,2349,4698,9396,18791,37582
%N A122893 Position of largest coefficient of n-th self-composition of (x+x^2) for n>=0.
%C A122893 What is the limit a(n)/2^n = 0.573... ? Originated by Ralf Stephan in A092123 as the position of largest coefficient in the expansion of P(0)=x, P(n+1)=P(n)*[1+P(n)] (equivalent definition).
%t A122893 P[n_] := P[n] = If[n < 1, x, P[n - 1]*(P[n - 1] + 1)]; Table[p = Expand[CoefficientList[P[n], x]]; Position[p, Max[p]][[1]][[1]] - 1, {n, 0, 12}] (* _Vaclav Kotesovec_, Nov 08 2018 *)
%Y A122893 Cf. A092123, A122894; A122888.
%K A122893 more,nonn
%O A122893 0,3
%A A122893 _Paul D. Hanna_, Sep 19 2006
%E A122893 a(14)-a(15) from _Vaclav Kotesovec_, Nov 08 2018
%E A122893 a(16) from _Vaclav Kotesovec_, Nov 09 2018