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 A153660 #10 Mar 22 2021 06:04:19
%S A153660 527,529,899,901,1079,1081,1157,1159,1271,1273,1649,1651,1679,1681,
%T A153660 1817,1819,1919,1921,1961,1963,2117,2119,2171,2173,2327,2329,2489,
%U A153660 2491,2507,2509,2771,2773,2867,2869,2921,2923,3131,3133,3149,3151,3401,3403,3587,3589
%N A153660 Pairs of terms of A038512 which differ by 2.
%C A153660 In each pair, the number in between (528, 900, etc.) is always divisible by 6. - Howard Berman (howard_berman(AT)hotmail.com), Jan 02 2009
%H A153660 Amiram Eldar, <a href="/A153660/b153660.txt">Table of n, a(n) for n = 1..10000</a>
%e A153660 527 = 17*31 and 529 = 23*23. Both are composite with no prime factor less than 13 and they differ by 2.
%t A153660 q[n_] := AllTrue[n + {0, 2}, CompositeQ[#] && FactorInteger[#][[1, 1]] >= 13 &]; Flatten @ Outer[Plus, Select[Range[3500], q], {0, 2}] (* _Amiram Eldar_, Mar 22 2021 *)
%Y A153660 Cf. A038512.
%K A153660 nonn
%O A153660 1,1
%A A153660 Howard Berman (howard_berman(AT)hotmail.com), Dec 30 2008
%E A153660 More terms from _Amiram Eldar_, Mar 22 2021