login
A374367
a(n) = Im(A008683(n)*(i^n)).
2
1, 0, 1, 0, -1, 0, 1, 0, 0, 0, 1, 0, -1, 0, -1, 0, -1, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, -1, 0, 1, 0, 1, 0, -1, 0, -1, 0, -1, 0, -1, 0, 1, 0, 0, 0, 1, 0, 0, 0, -1, 0, -1, 0, -1, 0, 1, 0, 1, 0, -1, 0, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, -1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1
OFFSET
1
COMMENTS
Positions of zeros appear to give A337945.
a(n) > 0 if and only if mu(n) > 0 and i^n is purely imaginary, i.e., n is odd and squarefree. - Chai Wah Wu, Jul 06 2024
MATHEMATICA
nn = 83; ParallelTable[Im[(I^n)*MoebiusMu[n]], {n, 1, nn}]
PROG
(Python)
from sympy import mobius
def A374367(n): return mobius(n)*(0, 1, 0, -1)[n&3] # Chai Wah Wu, Jul 06 2024
CROSSREFS
KEYWORD
sign
AUTHOR
Mats Granvik, Jul 06 2024
STATUS
approved