login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A079546 a(n) = sigma(n) - 4*phi(n). 2
-3, -1, -4, -1, -10, 4, -16, -1, -11, 2, -28, 12, -34, 0, -8, -1, -46, 15, -52, 10, -16, -4, -64, 28, -49, -6, -32, 8, -82, 40, -88, -1, -32, -10, -48, 43, -106, -12, -40, 26, -118, 48, -124, 4, -18, -16, -136, 60, -111, 13, -56, 2, -154, 48, -88, 24, -64, -22, -172, 104, -178, -24, -40, -1, -108, 64, -196, -2, -80, 48, -208, 99, -214 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,1
COMMENTS
If k is even and a(k) = 0 then sigma(2*k) >= 4*k, i.e., 2*k is nondeficient (A023196) (Makowski, 1987). - Amiram Eldar, Dec 05 2023
REFERENCES
Andrzej Makowski, Remarks on some problems in the elementary theory of numbers, Acta Math. Univ. Comenian 50/51 (1987), 277-281.
József Sándor, Dragoslav S. Mitrinović, and Borislav Crstici, Handbook of Number Theory I, Springer, 2005, Chapter III, p. 88.
LINKS
FORMULA
Sum_{k=1..n} a(k) = c * n^2 + O(n*log(n)), where c = Pi^2/12 - 12/Pi^2 = -0.393387... . - Amiram Eldar, Dec 05 2023
MATHEMATICA
Table[DivisorSigma[1, n]-4*EulerPhi[n], {n, 80}] (* Harvey P. Dale, Dec 08 2014 *)
PROG
(PARI) vector(80, n, sigma(n) - 4*eulerphi(n)) \\ G. C. Greubel, Jun 19 2019
(Magma) [DivisorSigma(1, n) - 4*EulerPhi(n): n in [1..80]]; // G. C. Greubel, Jun 19 2019
(Sage) [sigma(n, 1) - 4*euler_phi(n) for n in (1..80)] # G. C. Greubel, Jun 19 2019
CROSSREFS
Sequence in context: A300238 A180062 A340072 * A014413 A262072 A321743
KEYWORD
sign,easy
AUTHOR
N. J. A. Sloane, Jan 23 2003
STATUS
approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 14:20 EDT 2024. Contains 371254 sequences. (Running on oeis4.)