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 A155211 #15 Sep 20 2023 20:30:53
%S A155211 1,2,3,4,6,8,9,12,13,14,16,25,26,27,31,33,34,36,37,38,40,43,48,54,63,
%T A155211 67,68,72,74,78,82,87,88,89,97,98,104,105,109,110,111,119,121,122,123,
%U A155211 129,145,156,157,162,163,166,167,172,173,179,180,182,184,186,187,189,195
%N A155211 Numbers n such that n^4+(n+1)^4 is a prime.
%H A155211 Vincenzo Librandi, <a href="/A155211/b155211.txt">Table of n, a(n) for n = 1..1000</a>
%t A155211 f[n_]:=n^4+(n+1)^4;lst={};Do[a=f[n];If[PrimeQ[a],AppendTo[lst,n]],{n,0,5!}];lst (* _Vladimir Joseph Stephan Orlovsky_, May 30 2009 *)
%t A155211 Select[Range[200],PrimeQ[#^4+(#+1)^4]&] (* _Harvey P. Dale_, Jun 15 2013 *)
%t A155211 Position[Total/@Partition[Range[200]^4,2,1],_?PrimeQ]//Flatten (* _Harvey P. Dale_, Sep 20 2023 *)
%o A155211 (Magma) [n: n in [1..200] | IsPrime(n^4+(n+1)^4)]; // _Vincenzo Librandi_, Aug 31 2012
%Y A155211 Cf. A153504, A154535.
%K A155211 nonn,easy
%O A155211 1,2
%A A155211 _Vincenzo Librandi_, Jan 22 2009