OFFSET
1,1
MATHEMATICA
Prime/@Select[Range[100], PrimeOmega[#]<=2&]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Jan 08 2024
STATUS
approved