%I #19 Jun 24 2022 23:37:02
%S 6,10,14,15,18,20,21,22,26,28,30,33,34,35,36,38,39,42,44,46,50,51,52,
%T 54,55,57,58,62,65,66,68,69,70,72,74,75,76,77,78,82,85,86,87,88,91,92,
%U 93,94,95,98,99,100,102,104,105,106,108,110,111,114,115,116,117,118
%N Composite numbers m = Product p_i^{e_i} such that p_j^{e_j} < p_k^{e_k} for all p_j < p_k.
%H Lei Zhou, <a href="/A057714/b057714.txt">Table of n, a(n) for n = 1..10000</a>
%e 140 is included because 140 = 2^2 * 5^1 * 7^1 and 2^2 < 5^1 < 7^1.
%t Select[Range[120], Less @@ Power @@@ (fi = FactorInteger[#]) && Length[fi] > 1 &] (* _Ray Chandler_, Nov 06 2008 *)
%K nonn
%O 1,1
%A _Leroy Quet_, Oct 24 2000
%E Title clarified by _Sean A. Irvine_, Jun 24 2022