

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
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

Scan decimal expansion of e from left to right, recording any 2digit 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



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



KEYWORD

nonn,base


AUTHOR

Andrew G. West (WestA(AT)wlu.edu), Mar 27 2005


EXTENSIONS



STATUS

approved



