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 A164989 #22 Sep 08 2022 08:45:47 %S A164989 6,7,9,42,49,54,66,73,81,88,96,100,106,118,120,121,126,175,190,196, %T A164989 207,208,234,235,240,271,301,312,322,342,343,367,378,379,381,384,397, %U A164989 399,415,418,423,442,444,480,505,513,520,556,574,609,628,664,666,700,702 %N A164989 Numbers n such that n^6 - n^3 + 1 is prime. %H A164989 G. C. Greubel, <a href="/A164989/b164989.txt">Table of n, a(n) for n = 1..10000</a> %t A164989 Select[Range[10^3], PrimeQ[#^6 - #^3 + 1] &] (* _Michael De Vlieger_, Dec 02 2017 *) %o A164989 (PARI) for(k=1,300,if(isprime(k^6-k^3+1),print1(k, ", "))) %o A164989 (Magma) [n: n in [0..1000] |IsPrime(n^3*(n^3-1)+1)] // _Vincenzo Librandi_, Dec 03 2010 %Y A164989 Cf. A153439, A175170. %K A164989 easy,nonn %O A164989 1,1 %A A164989 _Serge Batalov_, Sep 03 2009 %E A164989 More terms from _Vincenzo Librandi_, Mar 25 2010