OFFSET
1,2
COMMENTS
Corresponding primes start 3, 23, 257, 8233430727623, 98527218530093856775578873054487.
MATHEMATICA
Select[Range[3500], PrimeQ[Binomial[2*#, #] + #] &] (* Amiram Eldar, Apr 28 2025 *)
PROG
(Magma) [k: k in [1..1000] | IsPrime(Binomial(2*k, k)+k)];
(Python)
from math import comb
from gmpy2 import is_prime
def ok(n): return is_prime(comb(2*n, n) + n)
print([k for k in range(3050) if ok(k)]) # Michael S. Branicky, Apr 28 2025
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
Juri-Stepan Gerasimov, Apr 28 2025
EXTENSIONS
a(7) inserted and a(10)-a(13) from Michael S. Branicky, Apr 29 2025
STATUS
approved
