OFFSET
1,2
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
select( n -> isprime(16*n^4+625), [$0..1000]);
MATHEMATICA
Select[Range[300], PrimeQ[16 #^4+625]&] (* Harvey P. Dale, Mar 04 2024 *)
PROG
(Magma) [n: n in [0..500] |IsPrime(16*n^4 + 625 )]; // Vincenzo Librandi, Nov 25 2010
(PARI) is(n)=isprime(16*n^4+625) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
James R. Buddenhagen, Aug 03 2008
EXTENSIONS
More terms from Vincenzo Librandi, Mar 25 2010
STATUS
approved