OFFSET
1,3
LINKS
Robert Price, Table of n, a(n) for n = 1..2264
Eric Weisstein's World of Mathematics, Prime-Generating Polynomials
EXAMPLE
4 is in this sequence since 4^4 + 29*4^2 + 101 = 256+464+101 = 821 is prime.
MATHEMATICA
Select[Range[0, 100], PrimeQ[#^4+29#^2+101]&] (* Harvey P. Dale, Dec 15 2020 *)
PROG
(PARI) lista(nn) = for(n=0, nn, if(ispseudoprime(n^4+29*n^2+101), print1(n, ", "))); \\ Altug Alkan, Apr 19 2016
CROSSREFS
KEYWORD
nonn,less
AUTHOR
Robert Price, Apr 19 2016
STATUS
approved