A073246 - OEIS

%I #7 Nov 03 2015 08:45:51

%S 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,

%T 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,

%U 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

%N Prime digits in the decimal expansion of e.

%e e =2.718281... so we get 2,7,2...

%t Select[RealDigits[E,10,300][[1]],PrimeQ] (* _Harvey P. Dale_, Nov 03 2015 *)

%Y Cf. A001113.

%K easy,nonn,base

%O 0,1

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

%E More terms from _Benoit Cloitre_, Aug 27 2002