A017696 Denominator of sum of -16th powers of divisors of n.
1, 65536, 43046721, 4294967296, 152587890625, 1410554953728, 33232930569601, 281474976710656, 1853020188851841, 5000000000000000, 45949729863572161, 30814043149172736, 665416609183179841
Offset: 1
Links
- G. C. Greubel, Table of n, a(n) for n = 1..10000
Crossrefs
Cf. A017695.
Programs
-
Magma
[Denominator(DivisorSigma(16,n)/n^16): n in [1..20]]; // G. C. Greubel, Nov 05 2018
-
Mathematica
Table[Denominator[DivisorSigma[16, n]/n^16], {n, 1, 20}] (* G. C. Greubel, Nov 05 2018 *)
-
PARI
vector(20, n, denominator(sigma(n, 16)/n^16)) \\ G. C. Greubel, Nov 05 2018
Comments