A363049 Even numbers k having fewer prime factors, counted with multiplicity, than k-1.

46, 82, 106, 118, 166, 190, 226, 244, 262, 274, 298, 316, 326, 334, 346, 358, 386, 406, 442, 466, 478, 514, 526, 562, 568, 586, 622, 626, 676, 694, 706, 730, 766, 778, 802, 826, 838, 862, 886, 892, 898, 926, 946, 958, 982, 1006, 1018, 1030, 1046, 1054, 1090

Offset

1,1

Links

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

Example

46 = 2*23, so A001222(46) = 2, and 45 = 3*3*5, so A001222(45) = 3, thus 46 is a term of the sequence.

Mathematica

Select[2Range[550], PrimeOmega[#]<PrimeOmega[#-1]&] (* Stefano Spezia, May 15 2023 *)

Prog

(PARI) isok(n) = n%2==0 && bigomega(n) < bigomega(n-1) \\ Andrew Howroyd, May 14 2023

Crossrefs

Cf. A001222 (bigomega), A339910 (both odd and even).

Sequence in context: A020351 A113691 A188598 * A057454 A260278 A234260

Adjacent sequences: A363046 A363047 A363048 * A363050 A363051 A363052

Keyword

nonn

Author

Alexandre Herrera, May 14 2023

Status

approved