login
A320106
Möbius transform of A320107.
2
1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 1, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 1, 1, 0, 0
OFFSET
1
FORMULA
a(n) = Sum_{d|n} A008683(n/d) * A320107(d), where A008683 is Möbius mu-function.
PROG
(PARI)
A001227(n) = numdiv(n>>valuation(n, 2));
A064989(n) = {my(f); f = factor(n); if((n>1 && f[1, 1]==2), f[1, 2] = 0); for (i=1, #f~, f[i, 1] = precprime(f[i, 1]-1)); factorback(f)};
A252463(n) = if(!(n%2), n/2, A064989(n));
A320106(n) = sumdiv(n, d, moebius(n/d)*A320107(d));
CROSSREFS
Sequence in context: A104107 A120532 A373156 * A303561 A284680 A004555
KEYWORD
nonn
AUTHOR
Antti Karttunen, Nov 22 2018
STATUS
approved