OFFSET
1,1
COMMENTS
Below 32 this sequence and A063989 are identical.
MATHEMATICA
Select[Range[150], MemberQ[{2, 3}, Total[Transpose[ FactorInteger[#]] [[2]]]]&] (* Harvey P. Dale, Mar 28 2011 *)
PROG
(PARI) is(n)=my(t=bigomega(n)); t==2 || t==3 \\ Charles R Greathouse IV, Jun 19 2016
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Dec 01 2009
STATUS
approved