A217439 Primes or negative values of primes of the form 8*n^2 - 298*n + 2113 for n >= 0.

2113, 1823, 1549, 1291, 1049, 823, 613, 419, 241, 79, -67, -197, -311, -409, -491, -557, -607, -641, -659, -661, -647, -617, -571, -509, -431, -337, -227, -101, 41, 199, 373, 563, 769, 991, 1229, 1483, 1753, 2039, 2341, 2659, 3343, 3709, 4091, 4903, 5333, 5779, 6719, 7213

Offset

1,1

Comments

Terms are listed in the order of appearance. The absolute values are prime for 0 <= n <= 39.

Links

Table of n, a(n) for n=1..48.

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

Cf. A050267, A050268, A217440.

Sequence in context: A168662 A107528 A246808 * A365240 A067632 A236446

Adjacent sequences: A217436 A217437 A217438 * A217440 A217441 A217442

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