A073302 - OEIS

%I #10 Apr 11 2024 16:45:45

%S 0,1,4,8,11,15,16,17,18,19,22,24,26,28,29,30,33,36,37,38,39,40,42,45,

%T 50,52,53,60,62,63,64,65,68,71,73,74,75,76,78,79,82,83,85,87,89,91,92,

%U 93,98,99,101,102,106,110,111,114,116,119

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

%H Harvey P. Dale, <a href="/A073302/b073302.txt">Table of n, a(n) for n = 1..1000</a>

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

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

%Y Cf. A001113.

%K easy,nonn,base

%O 1,3

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

%E More terms from _Ray G. Opao_, Aug 31 2004