A017673 Numerator of sum of -5th powers of divisors of n.
1, 33, 244, 1057, 3126, 671, 16808, 33825, 59293, 51579, 161052, 64477, 371294, 69333, 254248, 1082401, 1419858, 652223, 2476100, 1652091, 4101152, 120789, 6436344, 687775, 9768751, 6126351, 14408200, 317251, 20511150, 349591, 28629152, 34636833, 13098896
Offset: 1
Examples
1, 33/32, 244/243, 1057/1024, 3126/3125, 671/648, 16808/16807, 33825/32768, 59293/59049, ...
Links
- G. C. Greubel, Table of n, a(n) for n = 1..10000
Programs
-
Magma
[Numerator(DivisorSigma(5,n)/n^5): n in [1..40]]; // G. C. Greubel, Nov 08 2018
-
Mathematica
Table[Numerator[DivisorSigma[-5, n]], {n,100}] (* Vladimir Joseph Stephan Orlovsky, Jul 22 2011 *) Table[Numerator[DivisorSigma[5, n]/n^5], {n, 1, 40}] (* G. C. Greubel, Nov 08 2018 *)
-
PARI
vector(40, n, numerator(sigma(n, 5)/n^5)) \\ G. C. Greubel, Nov 08 2018
Formula
Numerators of coefficients in expansion of Sum_{k>=1} x^k/(k^5*(1 - x^k)). - Ilya Gutkovskiy, May 25 2018
From Amiram Eldar, Apr 02 2024: (Start)
Dirichlet g.f. of a(n)/A017674(n): zeta(s)*zeta(s+5).
Comments