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 A161471 #19 Oct 09 2022 11:06:55
%S A161471 2,3,7,31,46663,387420499
%N A161471 Primes of the form k^k + k + 1.
%C A161471 The associated k are in A058911. - _R. J. Mathar_, Jun 12 2009
%C A161471 a(7) = 116035988662615798148247830...0301775295923724561430603629007 (1232 digits).
%F A161471 Intersection of A000040 and A066279. - _R. J. Mathar_, Jun 12 2009
%t A161471 Unprotect[Power]; Power[0, 0] = 1; Protect[Power]; lst={}; Do[p=n^n+n+1; If[PrimeQ[p], AppendTo[lst,p]], {n,0,100}]; lst
%t A161471 Join[{2},Select[Table[k^k+k+1,{k,1000}],PrimeQ]] (* _Harvey P. Dale_, Oct 09 2022 *)
%o A161471 (PARI) lista(nn) = for(k=0, nn, if(ispseudoprime(q=k^k+k+1), print1(q, ", "))); \\ _Jinyuan Wang_, Mar 01 2020
%Y A161471 Cf. A058911, A066279, A187605.
%K A161471 nonn
%O A161471 1,1
%A A161471 _Vladimir Joseph Stephan Orlovsky_, Jun 10 2009
%E A161471 Definition simplified by _R. J. Mathar_, Jun 12 2009