A359153 Numbers of the form 4u+3 with an odd number of prime factors (counted with multiplicity).

3, 7, 11, 19, 23, 27, 31, 43, 47, 59, 63, 67, 71, 75, 79, 83, 99, 103, 107, 127, 131, 139, 147, 151, 163, 167, 171, 175, 179, 191, 195, 199, 207, 211, 223, 227, 231, 239, 243, 251, 255, 263, 271, 275, 279, 283, 307, 311, 331, 343, 347, 359, 363, 367, 379, 383, 387, 399, 419, 423, 431, 435, 439, 443

Offset

1,1

Links

Table of n, a(n) for n=1..64.

Mathematica

Select[4*Range[0, 150]+3, OddQ[PrimeOmega[#]]&] (* Harvey P. Dale, Jun 01 2025 *)

Prog

(PARI) isA359153(n) = A359152(n);

Crossrefs

Intersection of A004767 and A026424.

Setwise difference A067019 \ A359151.

Setwise difference A004767 \ A359163.

Cf. A002145 (subsequence).

Cf. A359152 (characteristic function).

Sequence in context: A160227 A134442 A380787 * A094179 A085760 A179481

Adjacent sequences: A359150 A359151 A359152 * A359154 A359155 A359156

Keyword

nonn

Author

Antti Karttunen, Dec 17 2022

Status

approved