login
A051855
Numbers k such that (k!)^4+1 is prime.
3
0, 1, 2, 3, 4, 13, 112, 328, 11123
OFFSET
1,3
LINKS
Chris K. Caldwell, The PrimePages.
Chris Nash, Prime Form.
MATHEMATICA
Select[Range[0, 350], PrimeQ[(#!)^4 + 1]&] (* Vincenzo Librandi, Aug 15 2013 *)
PROG
(PARI) isok(n) = isprime(n!^4 + 1); \\ Michel Marcus, Aug 15 2013
(Magma) [n: n in [1..300] | IsPrime(Factorial(n)^4+1)]; // Vincenzo Librandi, Aug 15 2013
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
Andrew Walker (ajw01(AT)uow.edu.au), Dec 13 1999
EXTENSIONS
a(9) from Robert Price, Jul 24 2014
a(1)=0 inserted by Robert Price, Sep 01 2014
STATUS
approved