|
|
A105010
|
|
Primes from merging of 5 successive digits in decimal expansion of exp(Pi).
|
|
1
|
|
|
69263, 63277, 32779, 90863, 35069, 52783, 77731, 69383, 44587, 79609, 65327, 53279, 24223, 84401, 41039, 68477, 77243, 68059, 95881, 84449, 44491, 16319, 31963, 34147, 11287, 63773, 47353, 82129, 78919, 57271, 13397, 65951, 95101
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[FromDigits /@ Partition[RealDigits[Exp[Pi], 10, 500][[1]], 5, 1], # > 9999 && PrimeQ[#] &] (* Vincenzo Librandi, Apr 27 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Andrew G. West (WestA(AT)wlu.edu), Mar 31 2005
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|