login
Primes from merging of 4 successive digits in decimal expansion of Zeta(2) or (Pi^2)/6.
1

%I #13 Mar 09 2023 02:09:13

%S 6449,4493,5189,9901,2293,3833,6197,9623,3371,3719,9067,6287,7879,

%T 9463,8317,1733,7333,3677,5479,5879,2777,6323,6367,6709,1009,8783,

%U 4451,6833,5879,3929,4721,7219,1979,4091,2083,8263,6389,3797,3583,3343,2081,4877

%N Primes from merging of 4 successive digits in decimal expansion of Zeta(2) or (Pi^2)/6.

%H Vincenzo Librandi, <a href="/A105377/b105377.txt">Table of n, a(n) for n = 1..1000</a>

%H The first <a href="http://www.worldwideschool.org/library/books/sci/math/MiscellaneousMathematicalConstants/chap96.html">10,000 digits of Zeta(2)</a> as calculated by _Simon Plouffe_ at WorldWideSchool.org.

%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/RiemannZetaFunction.html">Riemann Zeta Functions</a>.

%t Select[FromDigits /@ Partition[RealDigits[Zeta[2], 10, 500][[1]], 4, 1], # > 999 && PrimeQ[#] &] (* _Vincenzo Librandi_, Apr 27 2013 *)

%Y Cf. A013661.

%K nonn,base

%O 1,1

%A Andrew G. West (WestA(AT)wlu.edu), Apr 02 2005

%E Changed offset from 0 to 1 by _Vincenzo Librandi_, Apr 27 2013