login
A175114
First differences of A175113.
4
1, 364, 7448, 51012, 206896, 620060, 1527624, 3281908, 6373472, 11454156, 19360120, 31134884, 48052368, 71639932, 103701416, 146340180, 201982144, 273398828, 363730392, 476508676, 615680240, 785629404, 991201288, 1237724852
OFFSET
0,2
COMMENTS
Convolution of the finite sequence 1,358,5279,11764,5279,358,1 with A000389. Number of points in the standard root system of the D_6 lattice having L_infinity norm n.
FORMULA
a(n)= 6*a(n-1) -15*a(n-2) +20*a(n-3) -15*a(n-4) +6*a(n-5) -a(n-6), n>6.
a(n) = ((2*n+1)^6-(2*n-1)^6)/2 = 4*n*(12*n^2+1)*(4*n^2+3), n>0. - Bruno Berselli, Dec 27 2010
G.f.: (358*x+5279*x^2+11764*x^3+5279*x^4+358*x^5+1+x^6)/(x-1)^6. - R. J. Mathar, Jan 03 2011
MATHEMATICA
CoefficientList[Series[(358 x + 5279 x^2 + 11764 x^3 + 5279 x^4 + 358 x^5 + 1+x^6)/(x - 1)^6, {x, 0, 40}], x] (* Vincenzo Librandi, Dec 20 2012 *)
PROG
(Magma) I:=[1, 364, 7448, 51012, 206896, 620060, 1527624]; [n le 7 select I[n] else 6*Self(n-1)-15*Self(n-2)+20*Self(n-3)-15*Self(n-4)+6*Self(n-5)-Self(n-6): n in [1..40]]; // Vincenzo Librandi, Dec 20 2012
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
R. J. Mathar, Feb 13 2010
STATUS
approved