A105375 Primes from merging of 2 successive digits in decimal expansion of Zeta(2) or (Pi^2)/6.
43, 47, 41, 89, 89, 67, 79, 43, 37, 73, 29, 37, 47, 73, 83, 89, 61, 19, 97, 53, 43, 31, 89, 23, 37, 71, 19, 67, 79, 79, 29, 83, 31, 17, 73, 67, 47, 79, 11, 79, 89, 23, 61, 19, 19, 23, 67, 97, 71, 89, 59, 47, 83, 59, 83, 31, 79, 29, 47, 19, 97, 79, 47, 73, 59, 83, 37, 89, 89
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
- 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.
Crossrefs
Cf. A013661.
Programs
-
Mathematica
Select[FromDigits /@ Partition[RealDigits[Zeta[2], 10, 500][[1]], 2, 1], # > 9 && PrimeQ[#] &] (* Vincenzo Librandi, Apr 27 2013 *)
Extensions
Changed offset from 0 to 1 by Vincenzo Librandi, Apr 27 2013