|
|
A104930
|
|
Primes from merging of 7 successive digits in decimal expansion of (Pi^2).
|
|
1
|
|
|
4010893, 4490999, 3699407, 6264133, 9205243, 1976609, 7808693, 9666571, 6571519, 3526177, 5920483, 9818873, 7626667, 6711043, 8715041, 3659527, 5952763, 2763577, 9547249, 6475277, 2206669, 7889291, 4432457, 5617253
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
Pi as defined at MathWorld.com
|
|
MATHEMATICA
|
Select[FromDigits/@Partition[RealDigits[Pi^2, 10, 500][[1]], 7, 1], #>1000000&&PrimeQ[#]&] (* Vincenzo Librandi, Apr 23 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Andrew G. West (WestA(AT)wlu.edu), Mar 29 2005
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|