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 A070325 #18 Nov 21 2013 12:47:47 %S A070325 1,2,4,6,16,180,210,430,466,556,690,760,936,966,1150,1870,2266,2646, %T A070325 2676,3390,3516,3910,4006,4566,4590,4936,5086,6576,6970,8626,9276, %U A070325 9336,10006,13686,15510,17320,17550,17850,18040,18060,18586,18700,19380 %N A070325 Numbers n such that n+1, n^2+1 and n^4+1 are primes. %H A070325 Charles R Greathouse IV, <a href="/A070325/b070325.txt">Table of n, a(n) for n = 1..10000</a> %t A070325 Do[ If[ PrimeQ[n + 1] && PrimeQ[n^2 + 1] && PrimeQ[n^4 + 1], Print[n]], {n, 1, 20000}] %t A070325 Select[Prime[Range[2200]]-1,And@@PrimeQ[{#^2+1,#^4+1}]&] (* _Harvey P. Dale_, Sep 24 2011 *) %o A070325 (PARI) for(n=1,33000,if(isprime(n^2+1)*isprime(n^4+1)*isprime(n+1)==1,print1(n,","))) %Y A070325 Subsequence of A070689. [Zak Seidov, Apr 09 2011] %K A070325 easy,nonn %O A070325 1,2 %A A070325 _Benoit Cloitre_, May 11 2002