A073246 Prime digits in the decimal expansion of e.
2, 7, 2, 2, 5, 5, 2, 3, 5, 3, 2, 7, 7, 3, 5, 2, 2, 7, 7, 5, 7, 2, 7, 3, 5, 5, 7, 7, 2, 7, 7, 2, 7, 3, 3, 5, 3, 5, 7, 5, 5, 7, 3, 2, 7, 5, 2, 5, 2, 7, 2, 7, 3, 3, 2, 3, 5, 2, 7, 3, 5, 2, 3, 5, 7, 2, 3, 3, 2, 5, 2, 5, 5, 3, 7, 3, 3, 2, 3, 2, 2, 7, 3, 7, 3, 2, 3, 3, 2, 7, 5, 3, 5, 2, 5, 5, 7, 3, 3, 7, 3, 7, 2, 5, 3
Offset: 0
Examples
e =2.718281... so we get 2,7,2...
Crossrefs
Cf. A001113.
Programs
-
Mathematica
Select[RealDigits[E,10,300][[1]],PrimeQ] (* Harvey P. Dale, Nov 03 2015 *)
Extensions
More terms from Benoit Cloitre, Aug 27 2002