A222410 Partial sums of A008534, or crystal ball sequence for {A_6}* lattice.
1, 15, 113, 575, 2171, 6581, 16955, 38613, 79885, 153091, 275661, 471395, 771863, 1217945, 1861511, 2767241, 4014585, 5699863, 7938505, 10867431, 14647571, 19466525, 25541363, 33121565, 42492101, 53976651
Offset: 0
Links
- Bruno Berselli, Table of n, a(n) for n = 0..1000
- Index entries for linear recurrences with constant coefficients, signature (7,-21,35,-35,21,-7,1).
Crossrefs
Cf. A008534.
Programs
-
Magma
/* By definition: */ A008534:=func
; [&+[A008534(i): i in [0..n]]: n in [0..25]]; // Bruno Berselli, Feb 28 2013 -
Mathematica
LinearRecurrence[{7, -21, 35, -35, 21, -7, 1}, {1, 15, 113, 575, 2171, 6581, 16955}, 26] (* Bruno Berselli, Feb 28 2013 *)
Formula
G.f.: (1+8*x+29*x^2+64*x^3+29*x^4+8*x^5+x^6)/(1-x)^7. [Bruno Berselli, Feb 28 2013]
a(n) = 1+(7/36)*n*(n+1)*(n^4+2*n^3+8*n^2+7*n+18). [Bruno Berselli, Feb 28 2013]