A034517 Sum of n-th powers of divisors of 10.
4, 18, 130, 1134, 10642, 103158, 1015690, 10078254, 100390882, 1001953638, 10009766650, 100048830174, 1000244144722, 10001220711318, 100006103532010, 1000030517610894, 10000152587956162, 100000762939584198, 1000003814697527770, 10000019073486852414
Offset: 0
Links
- T. D. Noe, Table of n, a(n) for n=0..200
- Index entries for linear recurrences with constant coefficients, signature (18,-97,180,-100).
Programs
-
Magma
[DivisorSigma(n, 10): n in [0..20]]; // Vincenzo Librandi, Apr 17 2014
-
Mathematica
With[{dt = Divisors[10]}, Table[Total[dt^n], {n, 0, 20}]] (* Harvey P. Dale, Feb 02 2011 *) Total[#^Range[0, 20]&/@Divisors[10]] (* Vincenzo Librandi, Apr 17 2014 *) DivisorSigma[Range[0,20],10] (* Harvey P. Dale, May 26 2019 *) -
PARI
a(n)=sigma(10,n) \\ Charles R Greathouse IV, May 16 2011
-
Sage
[sigma(10,n)for n in range(0,18)] # Zerinvary Lajos, Jun 04 2009
Formula
G.f.: -2*(90*x^3-97*x^2+27*x-2) / ((x-1)*(2*x-1)*(5*x-1)*(10*x-1)). - Colin Barker, Apr 20 2014
Extensions
More terms from Colin Barker, Apr 20 2014