|
|
A225141
|
|
Primes from merging of 10 successive digits in the decimal expansion of exp(2).
|
|
2
|
|
|
7460575007, 2252257379, 6079057763, 5316126547, 7447839221, 5414146799, 2933188807, 8997407299, 7407299869, 2998696009, 9869600953, 2368469479, 6947930299, 7714456831, 1445683123, 6619147987, 8715043283, 7724849201, 8492011193, 1193531621, 2117195173
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Leading zeros are not permitted, so each prime is 10 digits in length. The terms are listed in the order in which they occur.
|
|
LINKS
|
|
|
MATHEMATICA
|
With[{len = 10}, FromDigits /@ Select[Partition[RealDigits[E^2, 10, 700][[1]], len, 1], PrimeQ[FromDigits[#]] && IntegerLength[FromDigits[#]] == len &]]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|