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 A272444 #12 Feb 16 2025 08:33:34 %S A272444 286397,8543,210011,336121,402851,424163,412123,377021,327491,270631, %T A272444 212123,156353,106531,64811,32411,9733,3517,8209,5669,2441,14243, %U A272444 27763,41051,52301,59971,62903,60443,52561,39971,24251,7963,5227,10429,1409,29531,91673 %N A272444 Primes of the form abs(n^5 - 99n^4 + 3588n^3 - 56822n^2 + 348272n - 286397) in order of increasing nonnegative n. %H A272444 Robert Price, <a href="/A272444/b272444.txt">Table of n, a(n) for n = 1..2170</a> %H A272444 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/Prime-GeneratingPolynomial.html">Prime-Generating Polynomials</a> %e A272444 402851 is in this sequence since abs(4^5 - 99*4^4 + 3588*4^3 - 56822*4^2 + 348272*4 - 286397) = abs(1024-25344+229632-909152+1393088-286397) = 402851 is prime. %t A272444 n = Range[0, 100]; Select[n^5 - 99n^4 + 3588n^3 - 56822n^2 + 348272n - 286397, PrimeQ[#] &] %o A272444 (PARI) lista(nn) = for(n=0, nn, if(isprime(p=abs(n^5-99*n^4+3588*n^3-56822*n^2+348272*n-286397)), print1(p, ", "))); \\ _Altug Alkan_, Apr 29 2016 %Y A272444 Cf. A050268, A050267, A005846, A007641, A007635, A048988, A050265, A050266. %Y A272444 Cf. A271980, A272030, A272074, A272075, A272159, A271143, A272284, A272302, A272437, A272443. %K A272444 nonn %O A272444 1,1 %A A272444 _Robert Price_, Apr 29 2016