login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

The continued fraction for the "binary" Copeland-Erdős constant.
2

%I #9 Jul 04 2024 16:21:07

%S 0,1,2,1,3,5,2,1,2,5,5,2,19,1,2,1,2,42,2,2,2,1,2,3,1,1,26,20,8,5,1,1,

%T 1,21,9,1,1,1,6,1,5,18,3,5,3,10,1,1,8,5,2,1,2,1,3,2,1,5,2,1,1,15,3,1,

%U 4,3,2,2,2,1,3,1,275,1,2,20,120,1,12,1,9,1424,1,2,36,1,2,2,4,1,4,1,9,1,1,2

%N The continued fraction for the "binary" Copeland-Erdős constant.

%t a = {}; Do[ a = Append[a, IntegerDigits[ Prime[n], 2]], {n, 1, 10^3} ]; ContinuedFraction[ N[ FromDigits[ {Flatten[a], 0}, 2], 500]]

%Y Cf. A066747 (decimal expansion).

%K base,cofr,nonn

%O 0,3

%A _Robert G. Wilson v_, Jan 16 2002

%E Offset changed by _Andrew Howroyd_, Jul 04 2024