A051855 Numbers n such that (n!)^4+1 is prime.
0, 1, 2, 3, 4, 13, 112, 328, 11123
Offset: 1
Keywords
Links
- C. K. Caldwell, The Prime Pages
- C. Nash, Prime Form [?Broken link]
Programs
-
Magma
[n: n in [1..300] | IsPrime(Factorial(n)^4+1)]; // Vincenzo Librandi, Aug 15 2013
-
Mathematica
Select[Range[0, 350], PrimeQ[(#!)^4 + 1]&] (* Vincenzo Librandi, Aug 15 2013 *)
-
PARI
isok(n) = isprime(n!^4 + 1); \\ Michel Marcus, Aug 15 2013
Extensions
a(9) from Robert Price, Jul 24 2014
Prepended a(1)=0, Robert Price, Sep 01 2014