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 A064967 #4 May 14 2016 07:36:17
%S A064967 27346,62101,149650,168130,207670,230830,242443,249439,257227,278521,
%T A064967 300028,329389,342700,401980,436315,452281,456985,523972,528946,
%U A064967 530671,535918,612595,642832,657151,732799,733783,746848,758857,857662,866608
%N A064967 100000000n+1, 100000000n+3, 100000000n+7, 100000000n+9 are all primes.
%t A064967 Select[Range[10^6], PrimeQ[10^8# + 1] && PrimeQ[10^8# + 3] && PrimeQ[10^8# + 7] && PrimeQ[10^8# + 9] &]
%t A064967 Select[Range[900000],AllTrue[100000000#+{1,3,7,9},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, May 14 2016 *)
%Y A064967 Cf. A007811 and A064687.
%K A064967 nonn
%O A064967 1,1
%A A064967 _Robert G. Wilson v_, Oct 29 2001