A077628 Sum of terms in periodic part of continued fraction expansion of square root of 1+2^n.

3, 4, 0, 8, 14, 16, 42, 32, 82, 64, 270, 128, 518, 256, 642, 512, 2126, 1024, 7098, 2048, 7502, 4096, 14550, 8192, 19810, 16384, 108802, 32768, 101154, 65536, 299166, 131072, 360298, 262144, 891666, 524288, 2128896, 1048576, 8352642, 2097152, 4466878

Offset: 1

Author

Labos Elemer, Nov 13 2002

Keywords

• nonn

Links

• Chai Wah Wu, Table of n, a(n) for n = 1..78

Crossrefs

Cf. A077624-A077635.

Programs

Mathematica

Table[Apply[Plus, Last[ContinuedFraction[Sqrt[1+2^u]]]], {u, 1, 25}]
Join[{3,4,3},Table[Total[ContinuedFraction[Sqrt[1+2^n]][[2]]],{n,4,50}]] (* Harvey P. Dale, Oct 03 2016 *)

Extensions

More terms from Harvey P. Dale, Oct 03 2016

a(3) corrected by Chai Wah Wu, Sep 18 2021