A087701 Maximal term in Collatz-iteration started at -1+2^n.

1, 16, 52, 160, 9232, 9232, 4372, 13120, 39364, 118096, 1276936, 1276936, 6810136, 9565936, 28697812, 86093440, 1570824736, 1570824736, 2324522932, 6973568800, 20920706404, 62762119216, 188286357652, 564859072960, 9161049517720

Offset

1,2

Links

Table of n, a(n) for n=1..25.

Formula

a(n) = A025586(2^n-1).

Mathematica

Table[Max[NestWhileList[If[EvenQ[#], #/2, 3#+1]&, 2^n-1, #>1&]], {n, 30}] (* Harvey P. Dale, Jul 19 2019 *)

Crossrefs

Cf. A025586.

Sequence in context: A211592 A235653 A354886 * A211586 A232509 A087973

Adjacent sequences: A087698 A087699 A087700 * A087702 A087703 A087704

Keyword

nonn

Author

Labos Elemer, Sep 24 2003

Status

approved