login
A222410
Partial sums of A008534, or crystal ball sequence for {A_6}* lattice.
1
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,2
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]
MATHEMATICA
LinearRecurrence[{7, -21, 35, -35, 21, -7, 1}, {1, 15, 113, 575, 2171, 6581, 16955}, 26] (* Bruno Berselli, Feb 28 2013 *)
PROG
(Magma) /* By definition: */ A008534:=func<m | IsZero(m) select 1 else (7/6)*m*(m^2+2)*(m^2+3)>; [&+[A008534(i): i in [0..n]]: n in [0..25]]; // Bruno Berselli, Feb 28 2013
CROSSREFS
Cf. A008534.
Sequence in context: A370763 A295384 A110822 * A001849 A115150 A115138
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Feb 23 2013
STATUS
approved