A104928 Primes from merging of 5 successive digits in decimal expansion of (Pi^2).

83449, 44909, 61511, 11353, 33493, 82241, 25913, 40231, 14407, 77723, 12203, 46727, 98519, 28403, 52769, 21649, 16493, 66571, 26177, 58169, 69341, 20483, 95087, 78853, 63577, 52837, 26833, 63541, 69737, 22709, 92647, 47527, 75277

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]], 5, 1], #>10000&&PrimeQ[#]&] (* Vincenzo Librandi, Apr 23 2013 *)

Crossrefs

Sequence in context: A125779 A233925 A032752 * A202933 A013885 A205197

Adjacent sequences: A104925 A104926 A104927 * A104929 A104930 A104931

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 23 2013

Status

approved