|
%I #13 May 24 2023 18:09:01
%S 360287471,526059563,132328627,862794349,573834187,383418793,
%T 879307021,154089149,675092447,509244761,234544243,907774499,
%U 744992069,551702761,860626133,331384583,297606737,976067371,113200709,704723069,108657463
%N Primes from merging of 9 successive digits in decimal expansion of e.
%C Leading zeros are not permitted, so each term is 9 digits in length. - _Harvey P. Dale_, Oct 23 2011
%H Vincenzo Librandi, <a href="/A104850/b104850.txt">Table of n, a(n) for n = 1..1000</a>
%t With[{len=9},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
|
