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 A216300 #19 Jan 29 2025 15:07:43 %S A216300 13,160,376,391,421,547,586,712,745,748,754,808,883,985,1006,1210, %T A216300 1291,1333,1375,1462,1513,1588,1702,1798,2203,2269,2302,2353,2497, %U A216300 2584,2854,2920,3205,3358,3436,3583,3823,3832,3856,3982,4003,4084,4138,4339,4402 %N A216300 Numbers k such that 10k+3 is composite but 10k+1, 10k+7, 10k+9 are all prime. %H A216300 V. Raman, <a href="/A216300/b216300.txt">Table of n, a(n) for n = 1..10000</a> %F A216300 a(n) >> n log^3 n. - _Charles R Greathouse IV_, Sep 07 2012 %t A216300 t = {}; Do[ps = Select[Range[10*n, 10*n + 9], PrimeQ]; If[ps == {10*n + 1, 10*n + 7, 10*n + 9}, AppendTo[t, n]], {n, 0, 4738}]; t (* _T. D. Noe_, Sep 03 2012 *) %t A216300 Select[Range[5000],Boole[PrimeQ[10 #+{1,3,7,9}]]=={1,0,1,1}&] (* _Harvey P. Dale_, Jan 29 2025 *) %Y A216300 Cf. A032352, A007811, A078494. %K A216300 nonn %O A216300 1,1 %A A216300 _V. Raman_, Sep 03 2012