login
A105381
Primes from merging of 8 successive digits in decimal expansion of Zeta(2) or (Pi^2)/6.
1
51892189, 55822937, 29370007, 40043189, 28724687, 10294633, 54796811, 75645587, 55876963, 32008051, 63647887, 42276587, 32044721, 49278263, 38903797, 90379763, 63583343, 35833439, 12081809, 20818099, 18099593
OFFSET
1,1
COMMENTS
Initial zeros are not permitted, so each term in the sequence has eight digits. - Harvey P. Dale, Nov 11 2011
LINKS
The first 10,000 digits of Zeta(2) as calculated by Simon Plouffe at WorldWideSchool.org.
Eric Weisstein's World of Mathematics, Riemann Zeta Functions
MATHEMATICA
With[{c = FromDigits /@ Partition[RealDigits[Pi^2/6, 10, 1000][[1]], 8, 1]}, Select[c, IntegerLength[#] == 8 && PrimeQ[#] &]] (* Harvey P. Dale, Nov 11 2011 *)
Select[FromDigits /@ Partition[RealDigits[Zeta[2], 10, 31700][[1]], 8, 1], # > 9999999 && PrimeQ[#] &] (* Vincenzo Librandi, Apr 28 2013 *)
CROSSREFS
Cf. A013661.
Sequence in context: A251497 A015392 A211237 * A004672 A029824 A186596
KEYWORD
nonn,base
AUTHOR
Andrew G. West (WestA(AT)wlu.edu), Apr 02 2005
EXTENSIONS
Offset changed from 0 to 1 by Vincenzo Librandi, Apr 28 2013
STATUS
approved