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