login
A373002
a(n) = Sum_{k=1..n} tau( (n/gcd(k,n))^n ).
1
1, 4, 9, 24, 25, 120, 49, 144, 135, 540, 121, 1728, 169, 1456, 2145, 800, 289, 5220, 361, 8840, 5985, 5544, 529, 21216, 1125, 9100, 1863, 25200, 841, 252000, 961, 4160, 23529, 20196, 31465, 94392, 1369, 28120, 38961, 113520, 1681, 991452, 1849, 101024, 118215
OFFSET
1,2
FORMULA
a(n) = n * A373003(n).
If p is prime, a(p) = p^2.
a(n) = Sum_{d|n} phi(d) * tau(d^n).
PROG
(PARI) a(n) = sumdiv(n, d, eulerphi(d)*numdiv(d^n));
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, May 19 2024
STATUS
approved