|
|
A105376
|
|
Primes from merging of 3 successive digits in decimal expansion of Zeta(2) or (Pi^2)/6.
|
|
1
|
|
|
449, 643, 647, 241, 151, 251, 499, 773, 229, 293, 937, 383, 619, 197, 587, 431, 233, 337, 719, 787, 463, 683, 317, 173, 733, 367, 677, 509, 251, 547, 479, 811, 587, 823, 277, 761, 619, 191, 919, 587, 769, 563, 367, 709, 971, 859, 593, 163, 647, 887, 251
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[FromDigits /@ Partition[RealDigits[Zeta[2], 10, 500][[1]], 3, 1], # > 99 && PrimeQ[#] &] (* Vincenzo Librandi, Apr 27 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Andrew G. West (WestA(AT)wlu.edu), Apr 02 2005
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|