A145729 Partial sums of A052379.

0, 8, 80, 664, 5344, 42792, 342384, 2739128, 21913088, 175304776, 1402438288, 11219506392, 89756051232, 718048409960, 5744387279792, 45955098238456, 367640785907776, 2941126287262344, 23529010298098896, 188232082384791320

Offset: 0

Author

Vladimir Joseph Stephan Orlovsky, Oct 17 2008

Keywords

• nonn
• easy

Links

• Vincenzo Librandi, Table of n, a(n) for n = 0..400
• Index entries for linear recurrences with constant coefficients, signature (10,-17,8).

Crossrefs

Cf. A052379.

Programs

Magma

[8*(8^(n+1)-7*n-8)/49 : n in [0..20]]; // Vincenzo Librandi, Jul 04 2011

Mathematica

lst={};s=0;Do[s+=(s+=(s+=(s+=n)));AppendTo[lst,s],{n,0,5!}];lst

PARI

concat(0, Vec(-8*x/((x-1)^2*(8*x-1)) + O(x^100))) \\ Colin Barker, Oct 27 2014

Formula

a(n) = sum_{i=0..n-1} A052379(i).

a(n) = 8*(8^(n+1)-7*n-8)/49 = 8*A014831(n) = 2*A145730(n). - R. J. Mathar, Oct 21 2008

a(n) = 10*a(n-1)-17*a(n-2)+8*a(n-3). G.f.: -8*x / ((x-1)^2*(8*x-1)). - Colin Barker, Oct 27 2014

Extensions

Edited by R. J. Mathar, Oct 21 2008