OFFSET
1,2
COMMENTS
See A332472 for a description.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
a(4) = 0 since 4 = -(1 + i)^4 in Gaussian integers (i is the imaginary unit), so usigma(4) = (1 + i)^4 + 1 = -3, and a(4) = Im(-3) = 0.
MATHEMATICA
f[p_, e_] := If[Abs[p] == 1, 1, (p^e + 1)]; usigma[n_] := Times @@ f @@@ FactorInteger[n, GaussianIntegers -> True]; a[n_] := Im[usigma[n]]; Array[a, 100]
CROSSREFS
KEYWORD
sign
AUTHOR
Amiram Eldar, Feb 13 2020
STATUS
approved