OFFSET
1,1
COMMENTS
Numbers k such that (1-isprime(k+1))*issquarefree(k+1)*omega(k) = omega(k+1)+1.
Contains 15*p if p is a prime > 5 such that (15*p + 1)/2 is prime. Thus Dickson's conjecture would imply that this sequence is infinite. - Robert Israel, May 24 2017
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
For example 322 = 2*7*23 has 3 distinct prime factors and 323=17*19 has 2 distinct prime factors, hence 322 is in the sequence.
MAPLE
Res:= NULL:
F:= []:
for n from 2 to 600 do
Fp:= ifactors(n+1)[2];
if nops(Fp) > 1 and max(seq(f[2], f=Fp)) = 1 and nops(F) = nops(Fp)+1 then Res:= Res, n fi;
F:= Fp;
od:
Res; # Robert Israel, May 24 2017
MATHEMATICA
Select[Range[500], CompositeQ[# + 1] && SquareFreeQ[# + 1] && PrimeNu[#] - PrimeNu[# + 1] == 1 &] (* Amiram Eldar, Jun 04 2022 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, Mar 09 2002
STATUS
approved