[go: up one dir, main page]

login
A034517
Sum of n-th powers of divisors of 10.
5
4, 18, 130, 1134, 10642, 103158, 1015690, 10078254, 100390882, 1001953638, 10009766650, 100048830174, 1000244144722, 10001220711318, 100006103532010, 1000030517610894, 10000152587956162, 100000762939584198, 1000003814697527770, 10000019073486852414
OFFSET
0,1
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
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 *)
PROG
(Sage) [sigma(10, n)for n in range(0, 18)] # Zerinvary Lajos, Jun 04 2009
(PARI) a(n)=sigma(10, n) \\ Charles R Greathouse IV, May 16 2011
(Magma) [DivisorSigma(n, 10): n in [0..20]]; // Vincenzo Librandi, Apr 17 2014
CROSSREFS
Sequence in context: A291335 A158341 A144272 * A294462 A194559 A356542
KEYWORD
nonn,easy
EXTENSIONS
More terms from Colin Barker, Apr 20 2014
STATUS
approved