[go: up one dir, main page]

login
A034288
Product of proper divisors is larger than for any smaller number.
7
1, 4, 6, 8, 10, 12, 18, 20, 24, 30, 36, 48, 60, 72, 84, 90, 96, 108, 120, 168, 180, 240, 336, 360, 420, 480, 504, 540, 600, 630, 660, 672, 720, 840, 1080, 1260, 1440, 1680, 2160, 2520, 3360, 3780, 3960, 4200, 4320, 4620, 4680, 5040, 7560, 9240, 10080
OFFSET
1,2
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..228 (terms below 10^10, terms 1..100 from T. D. Noe)
MATHEMATICA
maxTerm = 10^6; record = 0; Reap[For[n = 1, n <= maxTerm, n++, p = Times @@ Most[Divisors[n]]; If[p > record, record = p; Print[n]; Sow[n]]]][[2, 1]] (* Jean-François Alcover, Aug 01 2013 *)
CROSSREFS
Indices of records of A007956.
Sequence in context: A194594 A163248 A341280 * A131984 A359330 A307542
KEYWORD
easy,nonn,nice
STATUS
approved