OFFSET
1,1
COMMENTS
a(9) > 10^5. - Robert Price, Feb 04 2014
MATHEMATICA
Select[Range[0, 5000], PrimeQ[4^# + #^4 - 1] &]
PROG
(Magma) [n: n in [0..800] | IsPrime(4^n+n^4-1)];
(PARI) is(n)=ispseudoprime(4^n+n^4-1) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Sep 07 2012
EXTENSIONS
a(7)-a(8) from Robert Price, Feb 04 2014
STATUS
approved