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