OFFSET
1,3
COMMENTS
Used PrimeForm to prove primality for n = 4166 (classical N-1 test). - David Radcliffe, May 28 2007
EXAMPLE
k = 5 is here because 2*5! + 1 = 241 is prime.
MATHEMATICA
Select[Range[0, 400], PrimeQ[2*#! + 1] &] (* Vladimir Joseph Stephan Orlovsky, Feb 13 2012 *)
PROG
(Magma) [n: n in [0..1000] | IsPrime(2*Factorial(n) +1)]; // Vincenzo Librandi, Feb 21 2015
(PARI) is(k) = ispseudoprime(2*k!+1); \\ Jinyuan Wang, Feb 05 2020
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Labos Elemer, Dec 18 1999
EXTENSIONS
4166 from David Radcliffe, May 28 2007
More terms from Serge Batalov, Feb 18 2015
STATUS
approved