%I #16 Nov 08 2017 11:54:27
%S 9,2,3,1,2,4,9,9,9,6,8,3,4,5,0,2,4,1,1,7,4,0,1,2,3,3,0,6,0,9,8,4,2,1,
%T 9,1,6,6,3,6,7,4,8,8,6,2,9,1,6,9,0,3,9,8,9,4,1,4,7,4,4,4,1,1,1,3,5,6,
%U 7,3,9,1,1,6,5,1,4,7,4,5,2,7,3,5,4,1,2,5,4,0,4,3,2,5,1,5,0,1,9,1
%N Decimal expansion of number with continued fraction expansion 0, 1, 12, 123, 1234, 12345, 123456, ... (A007908).
%H G. C. Greubel, <a href="/A293577/b293577.txt">Table of n, a(n) for n = 0..5000</a>
%e 0.92312499968345024117401233060984219166367488... = 1/(1 + 1/(12 + 1/(123 + 1/(1234 + 1/(12345 + 1/(123456 + 1/...)))))).
%t Take[RealDigits[N[FromContinuedFraction[Table[FromDigits[Flatten[IntegerDigits[Range[n]]]], {n, 0, 20}]], 101]][[1]], 100] (* modified by _Ilya Gutkovskiy_, Nov 08 2017 *)
%Y Cf. A007908, A030167, A052119, A264934.
%K nonn,cons
%O 0,1
%A _Ilya Gutkovskiy_, Oct 12 2017
%E a(99) corrected by _G. C. Greubel_, Nov 07 2017
|