OFFSET
0,3
COMMENTS
MATHEMATICA
Table[Length[Select[IntegerPartitions[n], GreaterEqual@@PrimeOmega/@#&]], {n, 0, 30}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Dec 09 2022
STATUS
approved