OFFSET
1,1
COMMENTS
Terms are listed in the order of appearance. The absolute values are prime for 0 <= n <= 39.
LINKS
Eric Weisstein's World of Mathematics, Prime Generating Polynomials
MATHEMATICA
Select[Table[8*n^2 - 298*n + 2113, {n, 0, 50}], PrimeQ[#]&]
PROG
(PARI) [n | n <- apply(m->8*m^2-298*m+2113, [0..100]), isprime(abs(n))] \\ Charles R Greathouse IV, Jun 18 2017
CROSSREFS
KEYWORD
sign,easy,less
AUTHOR
Pedja Terzic, Oct 03 2012
EXTENSIONS
More terms (to distinguish from quadratic) from Charles R Greathouse IV, Jun 18 2017
STATUS
approved