|
|
A105007
|
|
Primes from merging of 2 successive digits in decimal expansion of exp(Pi).
|
|
2
|
|
|
23, 31, 79, 29, 67, 79, 47, 73, 61, 11, 19, 43, 23, 83, 97, 71, 19, 97, 67, 19, 67, 59, 73, 31, 41, 83, 47, 71, 17, 79, 53, 79, 23, 89, 13, 37, 41, 17, 41, 83, 47, 43, 59, 43, 67, 41, 13, 67, 71, 31, 19, 41, 47, 11, 37, 73, 31, 47, 47, 73, 53, 83, 31, 29, 47, 89, 19, 43, 73
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[FromDigits /@ Partition[RealDigits[Exp[Pi], 10, 500][[1]], 2, 1], # > 9 && PrimeQ[#] &] (* Vincenzo Librandi, Apr 26 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Andrew G. West (WestA(AT)wlu.edu), Mar 31 2005
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|