%I A100610
%S A100610 5,8,5,7,6,9,1,8,9,7,4,0,1,0,6,8,7,5,4,4,0,4,4,1,4,4,2,4,0,7,8,8,3,7,6,
%T A100610 8,4,9,2,8,2,7,3,5,2,1,0,5,9,2,6,8,9,0,2,4,0,2,4,8,3,5,2,1,8,2,2,7,6,1,
%U A100610 2,2,2,7,8,8,0,2,3,3,7,2,7,7,2,7,9,3,0,1,0,4,2,1,0,2,3,0,6,4,5,4,2,9,6
%N A100610 Decimal expansion of the constant whose continued fraction representation 
               is [A000523(1); A000523(2), A000523(3), A000523(4), ...] for all 
               positive integers. Note A000523(n) is Floor[Log[2,n]].
%e A100610 0.58576918974010687544044144240788376849282735210592689024024835218227612227880233727727930104210230645429673\
               020...
%t A100610 N[FromContinuedFraction[Table[Floor[Log[2, k]], {k, 1, 300}]], 111] N[FromContinuedFraction[Table[Floor[Log[2\
               , k]], {k, 1, 500}]], 111]
%Y A100610 Cf. A000523.
%Y A100610 Sequence in context: A020857 A096413 A090550 this_sequence A101465 A010719 
               A073212
%Y A100610 Adjacent sequences: A100607 A100608 A100609 this_sequence A100611 A100612 
               A100613
%K A100610 cons,nonn
%O A100610 0,1
%A A100610 Joseph Biberstine (jrbibers(AT)indiana.edu), Dec 01 2004