A138714 Add 1, modulo 10, to the decimal expansion of e, A001113.
3, 8, 2, 9, 3, 9, 2, 9, 3, 9, 5, 6, 0, 1, 5, 6, 3, 4, 6, 4, 7, 1, 3, 9, 8, 5, 8, 2, 4, 6, 3, 7, 7, 3, 5, 0, 8, 8, 6, 8, 3, 5, 8, 1, 0, 4, 7, 0, 0, 0, 6, 0, 6, 8, 5, 0, 7, 7, 0, 7, 8, 7, 3, 8, 8, 3, 5, 1, 8, 7, 7, 4, 1, 4, 6, 4, 6, 5, 8, 6, 0, 5, 6, 8, 2, 4, 9, 3, 2, 8, 9, 6, 3, 6, 2, 7, 7, 5, 3, 8, 5, 3, 8, 5, 7
Offset: 1
Examples
3.82939293956015634647139858...
Programs
-
Mathematica
Mod[# + 1, 10] & /@ First@ RealDigits@ N[E, 105] (* Michael De Vlieger, Apr 01 2015 *)
-
Sage
[(floor((1+e*10^n))%10) for n in range(105)] # Danny Rorabaugh, Apr 01 2015
Extensions
Offset set to 1 by Alois P. Heinz, Jul 05 2022