The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Please make a donation to keep the OEIS running. We are now in our 56th year. In the past year we added 10000 new sequences and reached almost 9000 citations (which often say "discovered thanks to the OEIS"). Other ways to donate

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A285614 Unitary highly abundant numbers: numbers n such that usigma(n) > usigma(m) for all m < n, where usigma(n) = sum of unitary divisors of n (A034448). 6
 1, 2, 3, 4, 5, 6, 10, 12, 14, 18, 21, 22, 26, 30, 42, 60, 66, 78, 90, 102, 114, 130, 138, 150, 170, 174, 186, 210, 294, 318, 330, 390, 462, 510, 546, 570, 690, 798, 858, 870, 930, 1050, 1110, 1218, 1230, 1290, 1410, 1470, 1554, 1590, 1722, 1770, 1830, 1974 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS Corresponds to A002093 (Highly abundant numbers), with usigma(n) = sum of unitary divisors of n (divisors d such that gcd(d, n/d)=1, A034448) instead of sigma(n) (sum of divisors, A000203). Contains many terms of A280013 (sum of squarefree divisors instead of unitary divisors), but not all of them - the first terms of A280013 that are not in this sequence are 16530, 26070, 8734110, 8757210,... LINKS Amiram Eldar, Table of n, a(n) for n = 1..1000 EXAMPLE The first 9 values of usigma(n) for n=1..9 are: 1, 3, 4, 5, 6, 12, 8, 9, 10. usigma(10)=18 is higher than these 9 values, thus 10 is in the sequence. MATHEMATICA usigma[n_] := If[n == 1, 1, Times @@ (1 + Power @@@ FactorInteger[n])]; a = {}; k = 0; Do[s = usigma[n]; If[s > k, AppendTo[a, n]; k = s], {n, 1000}]; a CROSSREFS Cf. A034448, A002093, A034683, A129499, A280013. Sequence in context: A116998 A337211 A333987 * A078931 A018779 A018382 Adjacent sequences:  A285611 A285612 A285613 * A285615 A285616 A285617 KEYWORD nonn AUTHOR Amiram Eldar, Apr 22 2017 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified November 25 20:48 EST 2020. Contains 338627 sequences. (Running on oeis4.)