A322839 Numbers n with more prime factors (counted with multiplicity) than n+1.

4, 6, 8, 10, 12, 16, 18, 20, 22, 24, 28, 30, 32, 36, 40, 42, 45, 46, 48, 50, 52, 54, 56, 58, 60, 64, 66, 68, 70, 72, 76, 78, 80, 81, 82, 84, 88, 90, 92, 96, 100, 102, 104, 105, 106, 108, 110, 112, 114, 117, 120, 126, 128, 130, 132, 136, 138, 140, 144, 148, 150

Offset: 1

Author

Gus Wiseman, Dec 28 2018

Keywords

• nonn

Comments

First differs from A074827 in having 104.

Examples

			104 has four prime factors (2, 2, 2, 13), while 105 has only three (3, 5, 7), so 104 belongs to the sequence.
		

Links

• Robert Israel, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A000961, A001221, A001222, A045920, A294277, A294278, A302242, A322838, A322840.

Programs

Maple

R:= NULL: count:= 0: w:= 0:
for n from 2 while count < 100 do
  v:= numtheory:-bigomega(n);
  if v < w then R:= R,n-1; count:= count+1; fi;
  w:= v;
od:
R; # Robert Israel, Jan 16 2023

Mathematica

Select[Range[100],PrimeOmega[#]>PrimeOmega[#+1]&]
Position[Partition[PrimeOmega[Range[200]],2,1],?(#[[1]]>#[[2]]&),1,Heads -> False]//Flatten (* _Harvey P. Dale, Jan 02 2021 *)