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 A153504 #17 Sep 08 2022 08:45:39
%S A153504 1,5,17,23,32,33,35,39,42,66,68,76,78,90,113,118,129,152,181,186,188,
%T A153504 198,220,221,229,231,287,300,306,307,311,316,348,362,380,401,409,414,
%U A153504 426,443,453,464,487,503,508,510,511,560,572,593,628,644,646,662,691
%N A153504 Numbers n such that n^8+(n+1)^8 is a prime.
%H A153504 Vincenzo Librandi, <a href="/A153504/b153504.txt">Table of n, a(n) for n = 1..1000</a>
%t A153504 lst = {}; Do[ If[ PrimeQ[n^8 + (n + 1)^8], AppendTo[lst, n]], {n, 1000}]; lst (* _Robert G. Wilson v_, Feb 17 2009 *)
%t A153504 Flatten[Position[Partition[Range[700]^8,2,1],_?(PrimeQ[Total[#]]&),{1}, Heads-> False]] (* _Harvey P. Dale_, Jun 10 2014 *)
%o A153504 (Magma) [n: n in [1..700] | IsPrime(n^8+(n+1)^8)]; // _Vincenzo Librandi_, Aug 31 2012
%K A153504 nonn,easy
%O A153504 1,2
%A A153504 _Vincenzo Librandi_, Dec 28 2008
%E A153504 Extended by _Robert G. Wilson v_, Feb 17 2009