|
|
A077628
|
|
Sum of terms in periodic part of continued fraction expansion of square root of 1+2^n.
|
|
1
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
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 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|