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.

Showing 1-1 of 1 results.

A122893 Position of largest coefficient of n-th self-composition of (x+x^2) for n>=0.

Original entry on oeis.org

1, 1, 2, 5, 9, 19, 37, 74, 147, 294, 587, 1175, 2349, 4698, 9396, 18791, 37582
Offset: 0

Views

Author

Paul D. Hanna, Sep 19 2006

Keywords

Comments

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).

Crossrefs

Cf. A092123, A122894; A122888.

Programs

  • Mathematica
    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 *)

Extensions

a(14)-a(15) from Vaclav Kotesovec, Nov 08 2018
a(16) from Vaclav Kotesovec, Nov 09 2018
Showing 1-1 of 1 results.

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.