A017692 Denominator of sum of -14th powers of divisors of n.
1, 16384, 4782969, 268435456, 6103515625, 39182082048, 678223072849, 4398046511104, 22876792454961, 10000000000000, 379749833583241, 213986410758144, 3937376385699289, 5556003412779008, 5838585205078125
Offset: 1
Links
- G. C. Greubel, Table of n, a(n) for n = 1..10000
Crossrefs
Cf. A017691.
Programs
-
Magma
[Denominator(DivisorSigma(14,n)/n^14): n in [1..20]]; // G. C. Greubel, Nov 06 2018
-
Mathematica
Table[Denominator[DivisorSigma[14, n]/n^14], {n, 1, 20}] (* G. C. Greubel, Nov 06 2018 *)
-
PARI
vector(20, n, denominator(sigma(n, 14)/n^14)) \\ G. C. Greubel, Nov 06 2018
Comments