login
A104931
Primes from merging of 8 successive digits in decimal expansion of (Pi^2).
1
61883449, 83449099, 51135313, 19205243, 43001773, 34812203, 76779851, 76609903, 12328403, 26058169, 92048309, 73270033, 27003307, 62666711, 11043589, 15041003, 32578853, 65952763, 37922683, 41250269, 25026973
OFFSET
1,1
LINKS
Pi as defined at MathWorld.com
Expansion of Pi^2 done to 10,000 digits as part of Project Gutenberg.
MATHEMATICA
Select[FromDigits/@Partition[RealDigits[Pi^2, 10, 500][[1]], 8, 1], #>10000000&&PrimeQ[#]&] (* Vincenzo Librandi, Apr 24 2013 *)
CROSSREFS
Sequence in context: A022218 A059001 A059003 * A210298 A204883 A096559
KEYWORD
nonn,base
AUTHOR
Andrew G. West (WestA(AT)wlu.edu), Mar 29 2005
EXTENSIONS
Changed offset from 0 to 1 by Vincenzo Librandi, Apr 24 2013
STATUS
approved