This site is supported by donations to The OEIS Foundation. Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A018894 Numbers n such that sigma(n)/phi(n) sets a new record. 8
 1, 2, 4, 6, 12, 24, 30, 60, 120, 180, 210, 360, 420, 840, 1260, 1680, 2520, 4620, 9240, 13860, 18480, 27720, 55440, 110880, 120120, 180180, 240240, 360360, 720720, 1441440, 2162160, 3603600, 4084080, 4324320, 6126120, 12252240, 24504480, 36756720, 61261200 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 COMMENTS Remarkably similar to but ultimately different from A126098. - Jorg Brown and N. J. A. Sloane, Mar 06 2007 Is a(n+1) <= 2*a(n)? Is a(n) divisible by the primorial p# where p is the largest prime divisor of a(n)? Is a(k) divisible by p# for all k > n + 1? (Cf. A002110.) - David A. Corneth, May 22 2016 From Jud McCranie, Nov 28 2017: (Start) Yes, a(n+1) <= 2*a(n) -- if m is odd, phi(2m) = phi(m) and sigma(2m) = 3*sigma(m). If m is even then phi(2m) = 2*phi(m) and sigma(2m) > 2*sigma(m). So sigma(2m)/phi(2m) > sigma(m)/phi(m). LINKS Jud McCranie, Table of n, a(n) for n = 1..79 (first 63 terms from Donovan Johnson) MATHEMATICA Flatten@ Function[k, FirstPosition[k, #] & /@ Union@ Rest@ FoldList[Max, 0, k]]@ Array[DivisorSigma[1, #]/EulerPhi@ # &, 10^7] (* Michael De Vlieger, May 27 2016, Version 10 *) PROG (PARI) lista(nn) = {mse = 0; for (n=1, nn, se = sigma(n)/eulerphi(n); if (se > mse, print1(n, ", "); mse = se); ); } \\ Michel Marcus, Jul 10 2015 CROSSREFS Cf. A000010, A000203, A015702, A126098, A002110. Sequence in context: A266228 A265719 A126098 * A168264 A282472 A056795 Adjacent sequences:  A018891 A018892 A018893 * A018895 A018896 A018897 KEYWORD nonn AUTHOR EXTENSIONS More terms from Jud McCranie, Nov 09 2001 Initial term added by Arkadiusz Wesolowski, Sep 06 2012 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 October 17 08:36 EDT 2019. Contains 328107 sequences. (Running on oeis4.)