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 A216978 #8 Sep 23 2012 10:31:07 %S A216978 0,1,39,51,81,195,213,219,231,333,351,393,417,501,531,567,657,729,747, %T A216978 807,945,1005,1059,1161,1173,1185,1191,1203,1281,1335,1371,1467,1479, %U A216978 1563,1587,1647,1653,1749,1761,1821,1845,1875,1929,2373,2379,2421,2529,2595 %N A216978 Numbers n such that n^6+2 is prime. %C A216978 Except for the first term, all terms must be odd numbers. - _Harvey P. Dale_, Sep 23 2012 %H A216978 Harvey P. Dale, <a href="/A216978/b216978.txt">Table of n, a(n) for n = 1..1000</a> %t A216978 lst={}; Do[If[PrimeQ[n^6+2], AppendTo[lst, n]], {n, 0, 3000}]; lst %t A216978 Join[{0},Select[Range[1,3001,2],PrimeQ[#^6+2]&]] (* _Harvey P. Dale_, Sep 23 2012 *) %o A216978 (PARI) select(n->isprime(n^6+2),vector(2000,n,n-1)) /* _Joerg Arndt_, Sep 21 2012 */ %Y A216978 Cf. A067200, A067201, A216974, A216976. %K A216978 nonn %O A216978 1,3 %A A216978 _Michel Lagneau_, Sep 21 2012