OFFSET
1,3
LINKS
FORMULA
a(n) = Sum_{d|n} d * A346234(n/d).
Multiplicative with a(p^e) = p^e - nextprime(p) * p^(e-1), where nextprime function is A151800. - Amiram Eldar, Nov 18 2021
MATHEMATICA
f[p_, e_] := p^e - NextPrime[p] * p^(e-1); a[1] = 1; a[n_] := Times @@ f @@@ FactorInteger[n]; Array[a, 100] (* Amiram Eldar, Nov 18 2021 *)
PROG
CROSSREFS
KEYWORD
sign,mult
AUTHOR
Antti Karttunen, Nov 17 2021
STATUS
approved