A073302 Indices of prime digits (2, 3, 5, 7) in the decimal expansion of e.

0, 1, 4, 8, 11, 15, 16, 17, 18, 19, 22, 24, 26, 28, 29, 30, 33, 36, 37, 38, 39, 40, 42, 45, 50, 52, 53, 60, 62, 63, 64, 65, 68, 71, 73, 74, 75, 76, 78, 79, 82, 83, 85, 87, 89, 91, 92, 93, 98, 99, 101, 102, 106, 110, 111, 114, 116, 119

Offset

1,3

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Example

e=2.71828182... so the indices of prime digits are 0,1,4,8...

Mathematica

With[{edgs=RealDigits[E, 10, 120][[1]]}, Flatten[Position[edgs, _?(PrimeQ[#]&)]]-1] (* Harvey P. Dale, Apr 11 2024 *)

Crossrefs

Cf. A001113.

Sequence in context: A311048 A355750 A311049 * A191105 A248232 A047346

Adjacent sequences: A073299 A073300 A073301 * A073303 A073304 A073305

Keyword

easy,nonn,base

Author

Y. Kelly Itakura (yitkr(AT)mta.ca), Aug 22 2002

Extensions

More terms from Ray G. Opao, Aug 31 2004

Status

approved