A112853 Numbers k such that (2*k)!/k!-1 is prime.
2, 6, 14, 25, 114, 188, 193, 361, 712, 1767, 3195, 4995, 5682, 6485, 9937
Offset: 1
Crossrefs
Programs
-
Mathematica
Select[Range[7000], PrimeQ[(2#)!/#!-1]&] (* James C. McMahon, Jun 12 2024 *)
Extensions
a(15) from Michael S. Branicky, Jun 12 2024
Comments