OFFSET
1,1
EXAMPLE
23 is in the sequence since Omega(24) = 4 = 1 + 3 = Omega(23) + 3.
MATHEMATICA
m = 3; s = {}; Do[If[PrimeOmega[x + 1] == PrimeOmega[x] + m, AppendTo[s, x]], {x, 600}]; s
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Jun 16 2020
STATUS
approved