A217440 Primes or negative values of primes of the form 8*n^2 - 326*n + 2659 for n >= 0.

2659, 2341, 2039, 1753, 1483, 1229, 991, 769, 563, 373, 199, 41, -101, -227, -337, -431, -509, -571, -617, -647, -661, -659, -641, -607, -557, -491, -409, -311, -197, -67, 79, 241, 419, 613, 823, 1049, 1291, 1549, 1823, 2113, 2741, 3079, 3433, 3803

Offset: 1

Author

Pedja Terzic, Oct 03 2012

Keywords

• sign
• easy
• less

Comments

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

Links

• Eric Weisstein's World of Mathematics, Prime Generating Polynomials

Crossrefs

Cf. A050267, A050268, A217439.

Programs

Mathematica

Select[Table[8*n^2 - 326*n + 2659, {n, 0, 50}], PrimeQ[#]&]

PARI

[n | n <- apply(m->8*m^2-326*m+2659, [0..100]), isprime(abs(n))] \\ Charles R Greathouse IV, Jun 18 2017

Extensions

More terms (to distinguish from quadratic) from Charles R Greathouse IV, Jun 18 2017