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 A126916 #10 Oct 04 2018 18:31:29 %S A126916 1,2,11,23,47,64,77,80,103,251,290,321,331,335,375,382,387,403,507, %T A126916 568,590,594,649,801,805,828,830,840,847,854,905,925,926,959,982,986, %U A126916 1034,1086,1094,1102,1122,1129,1147,1160,1391 %N A126916 Numbers n such that 1 + n^2 + n^4 + n^6 + n^8 + n^10 + n^12 + n^14 + n^16 + n^18 + n^20 + n^22 + n^23 is prime. %H A126916 Harvey P. Dale, <a href="/A126916/b126916.txt">Table of n, a(n) for n = 1..1000</a> %t A126916 a = {}; Do[If[PrimeQ[1 + n^2 + n^4 + n^6 + n^8 + n^10 + n^12 + n^14 + n^16 + n^18 + n^20 + n^22 + n^23], AppendTo[a, n]], {n, 1, 1400}]; a %t A126916 Select[Range[1400],PrimeQ[Total[#^Range[2,22,2]]+1+#^23]&] (* _Harvey P. Dale_, Oct 04 2018 *) %o A126916 (PARI) is(n)=isprime(1+n^2+n^4+n^6+n^8+n^10+n^12+n^14+n^16+n^18+n^20+n^22+n^23) \\ _Charles R Greathouse IV_, Feb 17 2017 %Y A126916 Cf. A049407, A124175 A124176 A124177, A124178, A124179, A124180, A124181, A126908-A126916. %K A126916 nonn %O A126916 1,2 %A A126916 _Artur Jasinski_, Dec 31 2006