login
Numbers n such that A076078(n) > A076078(m) for all m < n, A076078(n) being the number of sets of distinct positive integers with a least common multiple of n.
6

%I #11 Jul 28 2019 07:42:32

%S 1,2,4,6,12,24,30,36,48,60,120,180,240,360,420,720,840,1260,1680,2520,

%T 4620,5040,7560,9240,10080,12600,13860,15120,18480,20160,25200,27720,

%U 45360,50400,55440,83160,110880,138600,166320,221760,277200,332640

%N Numbers n such that A076078(n) > A076078(m) for all m < n, A076078(n) being the number of sets of distinct positive integers with a least common multiple of n.

%C RECORDS transform of A076078. All highly composite numbers (A002182) are members. All members belong to A025487 and A067128.

%H Amiram Eldar, <a href="/A097212/b097212.txt">Table of n, a(n) for n = 1..500</a>

%t f[n_] := Block[{d = Divisors[n]}, Plus @@ (MoebiusMu[n/d](2^DivisorSigma[0, d] - 1))]; b = 0; l = {}; Do[c = a[n]; If[c > b, b = c; AppendTo[l, n]], {n, 10^6}]; l (* _Robert G. Wilson v_, Aug 13 2004 *)

%Y Cf. A140999 (intersection of A025487 and A067128). - _Matthew Vandermast_, Oct 11 2008

%K nonn

%O 1,2

%A _Matthew Vandermast_, Aug 07 2004

%E More terms from _Robert G. Wilson v_, Aug 13 2004