OFFSET
1,3
COMMENTS
21 is the smallest number not in this sequence.
LINKS
Robert Price, Table of n, a(n) for n = 1..2457
Eric Weisstein's World of Mathematics, Prime-Generating Polynomials
EXAMPLE
4 is in this sequence since 4^4 + 853*4^3 + 2636*4^2 + 3536*4 + 1753 = 256+54592+42176+14144+1753 = 112921 is prime.
MATHEMATICA
Select[Range[0, 100], PrimeQ[#^4 + 853#^3 + 2636#^2 + 3536# + 1753] &]
PROG
(PARI) lista(nn) = for(n=0, nn, if(isprime(n^4+853*n^3+2636*n^2+3536*n+1753), print1(n, ", "))); \\ Altug Alkan, Apr 25 2016
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert Price, Apr 25 2016
STATUS
approved