This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A217439 #32 Feb 16 2025 08:33:18 %S A217439 2113,1823,1549,1291,1049,823,613,419,241,79,-67,-197,-311,-409,-491, %T A217439 -557,-607,-641,-659,-661,-647,-617,-571,-509,-431,-337,-227,-101,41, %U A217439 199,373,563,769,991,1229,1483,1753,2039,2341,2659,3343,3709,4091,4903,5333,5779,6719,7213 %N A217439 Primes or negative values of primes of the form 8*n^2 - 298*n + 2113 for n >= 0. %C A217439 Terms are listed in the order of appearance. The absolute values are prime for 0 <= n <= 39. %H A217439 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/Prime-GeneratingPolynomial.html">Prime Generating Polynomials</a> %t A217439 Select[Table[8*n^2 - 298*n + 2113, {n, 0, 50}], PrimeQ[#]&] %o A217439 (PARI) [n | n <- apply(m->8*m^2-298*m+2113, [0..100]), isprime(abs(n))] \\ _Charles R Greathouse IV_, Jun 18 2017 %Y A217439 Cf. A050267, A050268, A217440. %K A217439 sign,easy,less %O A217439 1,1 %A A217439 _Pedja Terzic_, Oct 03 2012 %E A217439 More terms (to distinguish from quadratic) from _Charles R Greathouse IV_, Jun 18 2017