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