A359373 Nonmultiples of 4 that have an odd number of prime factors (with multiplicity).
2, 3, 5, 7, 11, 13, 17, 18, 19, 23, 27, 29, 30, 31, 37, 41, 42, 43, 45, 47, 50, 53, 59, 61, 63, 66, 67, 70, 71, 73, 75, 78, 79, 83, 89, 97, 98, 99, 101, 102, 103, 105, 107, 109, 110, 113, 114, 117, 125, 127, 130, 131, 137, 138, 139, 147, 149, 151, 153, 154, 157, 162, 163, 165, 167, 170, 171, 173, 174
Offset: 1
Keywords
Crossrefs
Programs
-
Mathematica
Select[Range[200], And[LiouvilleLambda[#] < 0, ! Divisible[#, 4]] &] (* Michael De Vlieger, Dec 28 2022 *)
-
PARI
isA359373(n) = A359372(n);