OFFSET
1,1
COMMENTS
Squarefree semiprimes (A006881) which have exactly one prime factor <=3 [R. J. Mathar, Dec 09 2009]
MAPLE
isA171156 := proc(n) local f; f := numtheory[factorset](n) ; if numtheory[bigomega](n) = 2 and nops(f) = 2 then if f = {2, 3} then false; else (n mod 2) = 0 or (n mod 3) = 0 ; fi; else false; fi; end:
for n from 10 to 500 do if isA171156(n) then printf("%d, ", n) ; fi; od: # R. J. Mathar, Dec 09 2009
CROSSREFS
KEYWORD
nonn,easy,less
AUTHOR
Juri-Stepan Gerasimov, Dec 04 2009
EXTENSIONS
Edited by Charles R Greathouse IV, Mar 25 2010
STATUS
approved