|
|
A104929
|
|
Primes from merging of 6 successive digits in decimal expansion of (Pi^2).
|
|
1
|
|
|
935861, 344909, 313699, 724079, 264133, 133493, 240259, 591377, 774023, 314407, 617677, 176779, 620657, 780869, 808693, 693527, 693421, 216493, 779413, 260581, 830981, 981887, 266671, 895087, 278581, 709547, 547249, 490859, 908597, 692647
(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]], 6, 1], #>100000&&PrimeQ[#]&] (* Vincenzo Librandi, Apr 23 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Andrew G. West (WestA(AT)wlu.edu), Mar 29 2005
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|