login
A104843
Primes from merging of 2 successive digits in decimal expansion of e.
39
71, 59, 23, 53, 47, 71, 13, 97, 47, 59, 67, 53, 47, 59, 71, 13, 17, 19, 59, 17, 41, 13, 59, 29, 43, 29, 29, 59, 73, 13, 23, 79, 43, 23, 29, 53, 31, 19, 19, 11, 73, 83, 41, 79, 89, 41, 67, 47, 61, 47, 41, 11, 53, 37, 23, 43, 37, 71, 53, 17, 61, 83, 61, 13, 31, 13, 83, 29, 97
OFFSET
1,1
COMMENTS
Scan decimal expansion of e from left to right, recording any 2-digit primes seen. Overlaps are allowed in all the sequences in this family. - N. J. A. Sloane, Feb 05 2012
Leading zeros are not permitted, so each term is 2 digits in length. [From Harvey P. Dale, Oct 23 2011]
LINKS
Eric Weisstein, e
MATHEMATICA
With[{len=2}, FromDigits/@Select[Partition[RealDigits[E, 10, 1000][[1]], len, 1], PrimeQ[FromDigits[#]]&&IntegerLength[FromDigits[#]]==len&]] (* Harvey P. Dale, Oct 23 2011 *)
CROSSREFS
Cf. A001113, A073246 (the one-digit primes in e), A104844 - A104862.
Sequence in context: A122967 A087075 A095936 * A322831 A127316 A322444
KEYWORD
nonn,base
AUTHOR
Andrew G. West (WestA(AT)wlu.edu), Mar 27 2005
EXTENSIONS
Changed offset from 0 to 1 by Vincenzo Librandi, Apr 21 2013
STATUS
approved