STATUS
reviewed
approved
reviewed
approved
proposed
reviewed
editing
proposed
Multiplicative with a(p^e) = (-1)^e*(p^2 + 1). - Amiram Eldar, Nov 30 2020
f[p_, e_] := (-1)^e*(p^2 + 1); a[1] = 1; a[n_] := Times @@ (f @@@ FactorInteger[n]); Array[a, 100] (* Amiram Eldar, Nov 30 2020 *)
Amiram Eldar, <a href="/A328639/b328639.txt">Table of n, a(n) for n = 1..10000</a>
approved
editing
proposed
approved
editing
proposed
(PARI) a(n)={sumdiv(n, d, (-1)^bigomega(n/d)*moebius(d)*d^2)} \\ Andrew Howroyd, Oct 25 2019
proposed
editing
editing
proposed