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 A216304 #13 Sep 15 2016 15:06:58 %S A216304 3,6,15,25,27,33,54,57,60,75,94,97,99,118,123,129,132,136,162,174,186, %T A216304 190,201,213,228,234,235,237,241,244,255,267,279,285,306,318,330,351, %U A216304 354,363,369,402,405,439,444,445,456,459,465,487,495,508,510,538 %N A216304 Values of k such that 10*k+1 and 10*k+7 alone are prime between 10*k and 10*k+9. %H A216304 V. Raman, <a href="/A216304/b216304.txt">Table of n, a(n) for n = 1..10000</a> %F A216304 a(n) >> n log^2 n. - _Charles R Greathouse IV_, Sep 07 2012 %t A216304 t = {}; Do[ps = Select[Range[10*n, 10*n + 9], PrimeQ]; If[ps == {10*n + 1, 10*n + 7}, AppendTo[t, n]], {n, 0, 699}]; t (* _T. D. Noe_, Sep 04 2012 *) %t A216304 Select[Range[600],Boole[PrimeQ[Range[10 #,10 #+9]]]=={0,1,0,0,0,0,0,1,0,0}&] (* _Harvey P. Dale_, Sep 15 2016 *) %Y A216304 Cf. A032352, A007811, A078494. %K A216304 nonn %O A216304 1,1 %A A216304 _V. Raman_, Sep 03 2012