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 A138023 #20 Jul 09 2025 23:32:39
%S A138023 1,5,8,22,24,34,48,52,58,59,69,73,92,110,134,148,157,167,181,188,226,
%T A138023 233,268,303,307,321,332,337,349,376,381,415,500,503,549,558,590,654,
%U A138023 656,659,680,681,682,696,706,710,724,773,785,838,848,880,892,906,915,918,932,937,939,954,983,993,995
%N A138023 Numbers m such that Sum_{k=0..8} (m+k)^k is a prime.
%H A138023 Chai Wah Wu, <a href="/A138023/b138023.txt">Table of n, a(n) for n = 1..3959</a>
%t A138023 Select[Range[500], PrimeQ[Sum[(# + i)^i, {i, 0, 8}]] &] (* _Alonso del Arte_, Nov 09 2014 *)
%o A138023 (PARI) for(n=1,10^3,if(isprime(sum(k=0,8,(n+k)^k)),print1(n,", "))); \\ _Joerg Arndt_, Nov 10 2014
%K A138023 nonn
%O A138023 1,2
%A A138023 _Vladimir Joseph Stephan Orlovsky_, May 06 2008
%E A138023 More terms from _Joerg Arndt_, Nov 10 2014