A365074 - OEIS

A365074

Numbers k such that k! - k^2 - 1 is prime.

4, 6, 14, 126, 184, 634, 1354, 1550, 6710

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

MATHEMATICA

Select[Range[4, 1600, 2], PrimeQ[#! - #^2 - 1] &] (* Amiram Eldar, Sep 12 2023 *)

PROG

(Python)

from gmpy2 import *

print([k for k in range(0, 2000) if is_prime((fac(n)- k*k - 1))])

CROSSREFS

KEYWORD

nonn,hard,more

AUTHOR

EXTENSIONS

a(9) from Michael S. Branicky, Sep 14 2023

STATUS

approved