OFFSET
1,2
COMMENTS
a(n) depends only on the prime signature of n.
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
MATHEMATICA
a[n_] := DivisorSigma[0, n]^PrimeNu[n]; Array[a, 100] (* Amiram Eldar, Sep 15 2024 *)
PROG
(Haskell)
a110088 n = a000005 n ^ a001221 n -- Reinhard Zumkeller, Aug 05 2014
(PARI) a(n) = {my(f = factor(n)); numdiv(f)^omega(f); } \\ Amiram Eldar, Sep 15 2024
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Reinhard Zumkeller, Jul 11 2005
STATUS
approved