A095942 Differences between adjacent digits of e.

5, -6, 7, -6, 6, -7, 7, -6, 6, -4, 1, 4, -9, 4, 1, -3, 1, 2, -2, 3, -6, 2, 6, -1, -3, 3, -6, 2, 2, -3, 4, 0, -4, 2, 5, -2, 0, -2, 2, -5, 2, 3, -7, 9, -6, 3, 3, 0, 0, -4, 4, -4, 2, -3, 5, -3, 0, 3, -3, 1, -1, -4, 5, 0, -5, 2, -4, 7, -1, 0, -3, -3, 3, 2, -2, 2, -1, 3, -2, 4, -5, 1, 2, -6, 2, 5, -6, -1, 6, 1, -3, -3, 3, -4, 5, 0, -2, -2, 5, -3

Offset: 1

Author

Herman Jamke (hermanjamke(AT)fastmail.fm), Jul 13 2004

Keywords

• base
• sign

Crossrefs

Cf. A001113, A138345.

Programs

Mathematica

b = RealDigits[N[E, 1000]]; b = First[b]; a = {}; Do[k = b[[n + 1]] - b[[n]]; AppendTo[a, k], {n, 1, 999}]; a (* Artur Jasinski, Mar 16 2008 *)
Differences[RealDigits[E,10,120][[1]]] (* Harvey P. Dale, Dec 27 2018 *)

Extensions

More terms from Artur Jasinski, Mar 16 2008