OFFSET
1,7
LINKS
FORMULA
a(1) = 1, and for n > 1, a(n) = -Sum_{d|n, d<n} A351083(n/d) * a(d).
PROG
(PARI)
A327860(n) = { my(s=0, m=1, p=2, e); while(n, e = (n%p); m *= (p^e); s += (e/p); n = n\p; p = nextprime(1+p)); (s*m); };
memoA354823 = Map();
CROSSREFS
KEYWORD
sign
AUTHOR
Antti Karttunen, Jun 09 2022
STATUS
approved