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,1

Links

Table of n, a(n) for n=1..100.

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 *)

Crossrefs

Cf. A001113, A138345.

Sequence in context: A171423 A101288 A212479 * A139395 A029911 A328941

Adjacent sequences: A095939 A095940 A095941 * A095943 A095944 A095945

Keyword

base,sign

Author

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

Extensions

More terms from Artur Jasinski, Mar 16 2008

Status

approved