|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
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
Adjacent sequences: A104928 A104929 A104930 * A104932 A104933 A104934
|
|
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
|
|
|
|