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 A230581 #20 May 15 2025 18:51:57 %S A230581 2,4,5,6,7,14,22,25,40,47,50,57,60,69,71,76,102,107,111,114,127,137, %T A230581 146,152,172,189,196,197,207,212,231,251,267,277,284,291,294,296,307, %U A230581 309,316,319,324,371,386,392,397,412,414,445,447,467,481,494,524,527 %N A230581 Numbers k such that k^10 - k - 1 is prime. %H A230581 Robert Israel, <a href="/A230581/b230581.txt">Table of n, a(n) for n = 1..10000</a> %p A230581 filter:= n -> isprime(n^10-n-1): %p A230581 select(filter, [$1..1000]); # _Robert Israel_, May 15 2025 %t A230581 Select[Range[600],PrimeQ[#^10-#-1]&] (* _Harvey P. Dale_, Aug 20 2021 *) %o A230581 (PARI) for(n=1,10^3,if(isprime(n^10-n-1),print1(n,", "))); \\ _Joerg Arndt_, Oct 24 2013 %K A230581 nonn %O A230581 1,1 %A A230581 _Edward Jiang_, Oct 23 2013