OFFSET
0,4
COMMENTS
The next term is very large indeed (it has at least 400000 digits).
The constant A071873 is the sixth (of 10) decimal selvage numbers x that satisfy: x = Sum_{n>=0} ( floor(10*n*x) (mod 10) ) / 10^n.
EXAMPLE
x = 0.50505050505050505051616161616161616161627272727272...
MATHEMATICA
Clear[a]; Do[a[n] = If[OddQ[n], 5, 0], {n, 1, n0=4}]; a[_] = 0; digits = 10^(n0-1); Do[a[n] = Mod[Floor[10*n*Sum[a[k]/10^k, {k, 1, n}]], 10], {n, n0+1, digits}]; x = FromDigits[{Table[a[n], {n, 1, digits}], 0}, 10] // N[#, digits+1]&; ContinuedFraction[x] (* Jean-François Alcover, May 12 2015 *)
CROSSREFS
KEYWORD
nonn,cofr
AUTHOR
Paul D. Hanna, May 11 2015
STATUS
approved