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 A064965 #4 Mar 11 2015 09:11:09 %S A064965 14311,14659,23299,40861,43303,46405,62239,67327,77071,94237,102796, %T A064965 115201,120220,134968,138721,152980,252715,260947,272365,274534, %U A064965 285244,298342,304489,305713,311032,318802,324025,325321,338908,343885,352621 %N A064965 1000000n+1, 1000000n+3, 1000000n+7, 1000000n+9 are all primes. %t A064965 Select[Range[10^6/2], PrimeQ[10^6# + 1] && PrimeQ[10^6# + 3] && PrimeQ[10^6# + 7] && PrimeQ[10^6# + 9] &] %t A064965 Select[Range[400000],AllTrue[10^6*#+{1,3,7,9},PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* _Harvey P. Dale_, Mar 11 2015 *) %Y A064965 Cf. A007811 and A064687. %K A064965 nonn %O A064965 1,1 %A A064965 _Robert G. Wilson v_, Oct 29 2001