OFFSET
1,2
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = Sum_{d|n} phi(d) * sigma_2(d).
From Amiram Eldar, May 20 2024: (Start)
Multiplicative with a(p^e) = (p^(3*e+5) - p^(3*e+4) - p^(e+3) + p^e + p^4 - p^2) / ((p^2 - 1) * (p^3 - 1)).
Sum_{k=1..n} a(k) ~ c * n^4 / 4, where c = zeta(3) * zeta(4) * Product_{p prime} (1 - 1/p^2 - 1/p^4 + 1/p^5) = 0.749582840863254826301... . (End)
MATHEMATICA
a[n_] := DivisorSum[n, EulerPhi[#] * DivisorSigma[2, #] &]; Array[a, 100] (* Amiram Eldar, May 20 2024 *)
PROG
(PARI) a(n) = sumdiv(n, d, eulerphi(d)*sigma(d, 2));
CROSSREFS
KEYWORD
nonn,mult
AUTHOR
Seiichi Manyama, May 19 2024
STATUS
approved