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 A173180 #9 Sep 26 2023 14:15:40
%S A173180 4,6,8,14,18,20,24,26,28,32,40,42,50,58,62,68,72,100,104,120,122,140,
%T A173180 150,174,184,192,210,234,240,260,266,278,288,300,306,326,346,366,404,
%U A173180 432,444,460,464,466,470,484,488,512,516,526,538,556,562,564,570,584
%N A173180 Numbers k such that k^5-k^4-k^3-k^2-k-1 is prime.
%C A173180 All terms are even. - _Robert Israel_, Apr 11 2019
%H A173180 Robert Israel, <a href="/A173180/b173180.txt">Table of n, a(n) for n = 1..10000</a>
%F A173180 {k: A125083(k) in A000040}. [_R. J. Mathar_, Feb 13 2010]
%p A173180 filter:= k -> isprime( k^5-k^4-k^3-k^2-k-1):
%p A173180 select(filter, 2*[$1..500]); # _Robert Israel_, Apr 11 2019
%t A173180 f[n_]:=n^5-n^4-n^3-n^2-n-1;Select[Range[7! ],PrimeQ[f[ #1]]&]
%t A173180 Select[Range[2,600,2],PrimeQ[#^5-Total[#^Range[0,4]]]&] (* _Harvey P. Dale_, Sep 26 2023 *)
%Y A173180 Cf. A002328, A008864, A162294, A173179
%K A173180 nonn
%O A173180 1,1
%A A173180 _Vladimir Joseph Stephan Orlovsky_, Feb 11 2010