A104932 Primes from merging of 9 successive digits in decimal expansion of Pi^2.
761511353, 615113531, 790626413, 402591377, 137740231, 314407777, 727610617, 328403287, 869352769, 939666571, 151904453, 258260581, 592048309, 830981887, 887327003, 666711043, 435895087, 358950871, 577528379, 250269737, 581500063
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
- Simon Plouffe, Miscellaneous Mathematical Constants, Expansion of Pi^2 to 10000 decimals, project Gutenberg.
Crossrefs
Cf. A002388.
Programs
-
Mathematica
Select[FromDigits/@Partition[RealDigits[Pi^2, 10, 500][[1]], 9, 1], #>100000000&&PrimeQ[#]&] (* Vincenzo Librandi, Apr 24 2013 *)
Extensions
Changed offset from 0 to 1 by Vincenzo Librandi, Apr 24 2013