A117002 a(n) = sigma(n) + 3*A079667(n).

1, 6, 10, 16, 18, 30, 26, 42, 37, 54, 42, 76, 50, 78, 72, 94, 66, 120, 74, 126, 104, 126, 90, 180, 103, 150, 136, 182, 114, 222, 122, 210, 168, 198, 156, 286, 146, 222, 200, 288, 162, 312, 170, 294, 258, 270, 186, 400, 201, 324, 264, 350, 210, 408, 252, 396, 296, 342, 234

Offset: 1

Author

N. J. A. Sloane, Apr 15 2006

Keywords

• nonn

References

• H. J. S. Smith, Report on the Theory of Numbers, reprinted in Vol. 1 of his Collected Math. Papers, Chelsea, NY, 1979, see p. 322.

Links

• Michael De Vlieger, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A000203, A079667.

Programs

Mathematica

Table[DivisorSigma[1,n]+3DivisorSum[n,Abs[n/#-#]&,#<=Sqrt[n]&],{n, 59}] (* James C. McMahon, Aug 23 2024 *)