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
Keywords
Examples
46 = 2*23, so A001222(46) = 2, and 45 = 3*3*5, so A001222(45) = 3, thus 46 is a term of the sequence.
Programs
-
Mathematica
Select[2Range[550],PrimeOmega[#]
Stefano Spezia, May 15 2023 *) -
PARI
isok(n) = n%2==0 && bigomega(n) < bigomega(n-1) \\ Andrew Howroyd, May 14 2023