login
A359581
a(n) = (-1)^A329697(n).
5
1, 1, -1, 1, -1, -1, 1, 1, 1, -1, 1, -1, 1, 1, 1, 1, -1, 1, -1, -1, -1, 1, -1, -1, 1, 1, -1, 1, -1, 1, -1, 1, -1, -1, -1, 1, -1, -1, -1, -1, 1, -1, 1, 1, -1, -1, 1, -1, 1, 1, 1, 1, -1, -1, -1, 1, 1, -1, 1, 1, -1, -1, 1, 1, -1, -1, 1, -1, 1, -1, 1, 1, -1, -1, -1, -1, 1, -1, 1, -1, 1, 1, -1, -1, 1, 1, 1, 1, -1, -1, 1, -1, 1, 1, 1, -1, 1, 1, 1, 1, -1, 1, -1, 1, 1
OFFSET
1
LINKS
FORMULA
Fully multiplicative with a(p) = (-1)^A329697(p). [A329697 is totally additive]
a(n) = (-1)^A359583(n) = (-1)^A329697(n).
PROG
(PARI)
A329697(n) = if(!bitand(n, n-1), 0, 1+A329697(n-(n/vecmax(factor(n)[, 1]))));
A359581(n) = ((-1)^A329697(n));
CROSSREFS
Cf. A329697, A359583, A359584 (positions of -1's), A359585 (of +1's), A359586 (inverse Möbius transform).
Sequence in context: A358766 A359154 A359166 * A359792 A362927 A362928
KEYWORD
sign,mult
AUTHOR
Antti Karttunen, Jan 07 2023
STATUS
approved