OFFSET
1,1
COMMENTS
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
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
527 = 17*31 and 529 = 23*23. Both are composite with no prime factor less than 13 and they differ by 2.
MATHEMATICA
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 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Howard Berman (howard_berman(AT)hotmail.com), Dec 30 2008
EXTENSIONS
More terms from Amiram Eldar, Mar 22 2021
STATUS
approved