A105325 Digital expansion of e: numbers from each pair of successive digits.

27, 18, 28, 18, 28, 45, 90, 45, 23, 53, 60, 28, 74, 71, 35, 26, 62, 49, 77, 57, 24, 70, 93, 69, 99, 59, 57, 49, 66, 96, 76, 27, 72, 40, 76, 63, 3, 53, 54, 75, 94, 57, 13, 82, 17, 85, 25, 16, 64, 27, 42, 74, 66, 39, 19, 32, 0, 30, 59, 92, 18, 17, 41, 35, 96, 62, 90, 43, 57, 29, 0

Offset: 1

Author

Zak Seidov, Apr 30 2005

Keywords

• nonn
• base

Programs

Mathematica

Table[FromDigits[Partition[RealDigits[N[E, 200]][[1]], 2][[i]]], {i, 100}]
FromDigits/@Partition[RealDigits[E,10,250][[1]],2] (* Harvey P. Dale, Aug 19 2022 *)

Extensions

First Mathematica program corrected by Harvey P. Dale, Aug 19 2022