OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
Composite(5) = 10 = 5*2 and 5 - 2 = 3 (prime), so 5 is a term;
composite(7) = 14 = 7*2 and 7 - 2 = 5 (prime), so 7 is a term;
composite(8) = 15 = 5*3 and 5 - 3 = 2 (prime), so 8 is a term;
composite(11) = 20 = 5*2*2 and 5 - 2 = 3 (prime), so 11 is a term.
MAPLE
MATHEMATICA
Flatten @ Position[Select[Range[1000], CompositeQ], c_Integer /; PrimeQ[Last[#] - First[#]& @ FactorInteger[c][[All, 1]]]] (* Jean-François Alcover, Jul 24 2020 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Jan 08 2009
EXTENSIONS
Corrected (30 inserted, 43 inserted, 100 removed, ...) by R. J. Mathar, May 05 2010
STATUS
approved