STATUS
reviewed
approved
reviewed
approved
proposed
reviewed
editing
proposed
Sum_{k=1..n} a(k) ~ c * n^6, where c = zeta(7)/6 = 0.168058... . - Amiram Eldar, Nov 13 2022
f[p_, e_] := p^5*(p^(5*e) - p^(5*Floor[(e - 1)/2]))/(p^5 - 1); a[1] = 1; a[n_] := Times @@ f @@@ FactorInteger[n]; Array[a, 30] (* Amiram Eldar, Nov 13 2022 *)
Cf. A013665.
approved
editing
reviewed
approved
proposed
reviewed
editing
proposed
Multiplicative with a(p^e) = p^5*(p^(5*e) - p^(5*floor((e-1)/2)))/(p^5 - 1). - Sebastian Karlsson, Feb 25 2022
nonn,mult,new
approved
editing
reviewed
approved
proposed
reviewed