login
A066707
Incrementally largest terms in the continued fraction for the constant given by Sum_{k>=0} A033308(k) / 2^k = 2.89104866587305422....
0
2, 8, 10, 32, 39, 5903, 135598
OFFSET
1,1
COMMENTS
Previous name: Incrementally largest terms in the continued fraction for Copeland-Erdos constant 0.235711... (concatenate primes).
Appears to be a mistaken version of A033310 in which base 2 has been used in the "concatenation" of the digits in A033308 while still interpreting the digits of A033308 as decimal. - Sean A. Irvine, Nov 03 2023
MATHEMATICA
a = {}; Do[a = Append[a, IntegerDigits[ Prime[n]]], {n, 1, 5*10^4} ]; b = ContinuedFraction[ N[ FromDigits[{Flatten[a], 0}, 2], 5*10^4]]; c = -1; d = {}; Do[ If[b[[n]] > c, c = b[[n]]; d = Append[d, c]], {n, 1, 48336} ]; d
CROSSREFS
Sequence in context: A102943 A327988 A062880 * A107227 A188539 A230826
KEYWORD
nonn,base,more
AUTHOR
Robert G. Wilson v, Jan 14 2002
EXTENSIONS
Name changed to match data by Sean A. Irvine, Nov 03 2023
STATUS
approved