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 A217991 #8 Jun 24 2015 14:45:23
%S A217991 74,156,474,476,686,688,774,776,830,832,982,2698,3560,3646,4016,5974,
%T A217991 8542,8732,10730,10858,12164,12902,13022,13154,13554,13838,13840,
%U A217991 20436,20454,20504,21912,24554,24770,25582,30144,31634,31882,32358,32360,32992,33758
%N A217991 Numbers n such that n^16+1 and (n+2)^16+1 are both prime.
%e A217991 74 is in the sequence because 74^16+1 = 808551180810136214718004658177 and 76^16+1 = 1238846438084943599707227160577 are both prime.
%t A217991 lst={}; Do[p=n^16+1; q=(n+2)^16+1;If[PrimeQ[p] && PrimeQ[q], AppendTo[lst, n]], {n, 0, 34000}];lst
%t A217991 Select[Range[34000],AllTrue[{#^16+1,(#+2)^16+1},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Jun 24 2015 *)
%Y A217991 Cf. A006313.
%K A217991 nonn,easy
%O A217991 1,1
%A A217991 _Michel Lagneau_, Oct 17 2012