A302975 a(n) = denominator of tau(n)^n / n^tau(n).
1, 1, 9, 64, 25, 81, 49, 1, 1, 625, 121, 1, 169, 2401, 50625, 1048576, 289, 1, 361, 15625, 194481, 14641, 529, 6561, 15625, 28561, 531441, 117649, 841, 2562890625, 961, 1, 1185921, 83521, 1500625, 262144, 1369, 130321, 2313441, 390625, 1681, 37822859361, 1849
Offset: 1
Examples
For n = 6; tau(6)^6 / 6^tau(6) = 4^6 / 6^4 = 256 / 81; a(6) = 81.
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[Denominator((NumberOfDivisors(n)^n) / (n^NumberOfDivisors(n))): n in[1..100]];
-
Mathematica
Denominator[#[[2]]^#[[1]]/#[[1]]^#[[2]]]&/@Table[{n,DivisorSigma[0,n]},{n,50}] (* Harvey P. Dale, Sep 15 2019 *)
Formula
a(p) = p^2 for p = prime.
a(A120737(n)) = 1.
Comments