OFFSET
1,2
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
49 = 7*7 has two prime factors, while 50 = 2*5*5 has three, so 49 belongs to the sequence.
MATHEMATICA
Select[Range[100], PrimeOmega[#]<PrimeOmega[#+1]&]
Position[Partition[PrimeOmega[Range[150]], 2, 1], _?(#[[1]]< #[[2]]&), 1, Heads->False]//Flatten (* Harvey P. Dale, Sep 23 2021 *)
PROG
(PARI) isok(n) = bigomega(n) < bigomega(n+1); \\ Michel Marcus, Dec 29 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Dec 28 2018
STATUS
approved