%I #11 Dec 14 2014 02:06:03
%S 72407663,40766303,54759457,57138217,20030599,98807531,15738341,
%T 83418793,34884167,84167509,22648001,10753907,20695517,38606261,
%U 82656029,29760673,13200709,27443747,74704723,69772093,92836819
%N Primes from merging of 8 successive digits in decimal expansion of e.
%C Leading zeros are not permitted, so each term is 8 digits in length. - _Harvey P. Dale_, Oct 23 2011
%H Vincenzo Librandi, <a href="/A104849/b104849.txt">Table of n, a(n) for n = 1..1000</a>
%t With[{len=8},FromDigits/@Select[Partition[RealDigits[E,10,1000][[1]], len,1],PrimeQ[FromDigits[#]]&&IntegerLength[FromDigits[#]]==len&]] (* _Harvey P. Dale_, Oct 23 2011 *)
%Y Cf. A104843-A104862.
%K nonn,base
%O 1,1
%A Andrew G. West (WestA(AT)wlu.edu), Mar 27 2005
%E Offset changed from 0 to 1 by _Vincenzo Librandi_, Apr 21 2013