A033435 Continued fraction for Champernowne constant = 0.01234567891011121314...
0, 81, 1490845, 2, 5, 2, 1, 11, 1, 1, 1, 5, 1, 1, 1, 1
Offset: 0
Programs
-
Mathematica
ContinuedFraction[With[{nn=20,c=Flatten[IntegerDigits/@Range[0,nn]]}, N[ FromDigits[ c]/10^Length[c],Length[c]]],16] (* Harvey P. Dale, Apr 10 2013 *)
Extensions
Next term is very large.