|
%I #13 Mar 09 2023 02:08:48
%S 43,47,41,89,89,67,79,43,37,73,29,37,47,73,83,89,61,19,97,53,43,31,89,
%T 23,37,71,19,67,79,79,29,83,31,17,73,67,47,79,11,79,89,23,61,19,19,23,
%U 67,97,71,89,59,47,83,59,83,31,79,29,47,19,97,79,47,73,59,83,37,89,89
%N Primes from merging of 2 successive digits in decimal expansion of Zeta(2) or (Pi^2)/6.
%H Vincenzo Librandi, <a href="/A105375/b105375.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]], 2, 1], # > 9 && 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
|
