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 A272437 #13 Feb 16 2025 08:33:34 %S A272437 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25, %T A272437 26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,47,49,51, %U A272437 54,58,65,68,70,75,76,77,82,88,89,97,99,101,102,104,109 %N A272437 Nonnegative numbers n such that abs(-66n^3 + 3845n^2 - 60897n + 251831) is prime. %C A272437 46 is the smallest number not in this sequence. %H A272437 Robert Price, <a href="/A272437/b272437.txt">Table of n, a(n) for n = 1..3012</a> %H A272437 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/Prime-GeneratingPolynomial.html">Prime-Generating Polynomials</a> %e A272437 4 is in this sequence since abs(-66*4^3 + 3845*4^2 - 60897*4 + 251831) = abs(-4224+61520-243588+251831) = 65539 is prime. %t A272437 Select[Range[0, 109], PrimeQ[-66#^3 + 3845#^2 - 60897# + 251831] &] %o A272437 (PARI) is(n)=isprime(abs(66*n^3-3845*n^2+60897*n-251831)) \\ _Charles R Greathouse IV_, Feb 20 2017 %Y A272437 Cf. A050268, A050267, A005846, A007641, A007635, A048988, A050265, A050266, A271980, A272030, A272074, A272075, A272160, A271144, A272285, A272401, A272438. %K A272437 nonn %O A272437 1,3 %A A272437 _Robert Price_, Apr 29 2016