A046337 Odd numbers with an even number of prime factors (counted with multiplicity).
1, 9, 15, 21, 25, 33, 35, 39, 49, 51, 55, 57, 65, 69, 77, 81, 85, 87, 91, 93, 95, 111, 115, 119, 121, 123, 129, 133, 135, 141, 143, 145, 155, 159, 161, 169, 177, 183, 185, 187, 189, 201, 203, 205, 209, 213, 215, 217, 219, 221, 225, 235, 237, 247, 249, 253, 259
Offset: 1
Keywords
Links
- John Cerkan, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Mathematica
Select[Range[1,301,2],EvenQ[PrimeOmega[#]]&] (* Harvey P. Dale, Jul 25 2011 *)
-
PARI
lista(nn) = {forstep(n=1, nn, 2, if (bigomega(n) % 2 == 0, print1(n, ", ")));} \\ Michel Marcus, Jul 04 2015