OFFSET
0,3
LINKS
Index entries for linear recurrences with constant coefficients, signature (3,0,-8,6,6,-8,0,3,-1).
FORMULA
a(n) = [x^n] x^2*(9*x^4 + 21*x^3 + 31*x^2 + 15*x + 4) / ((x - 1)^6*(x + 1)^3).
a(n) ~ n^5/12. - Charles R Greathouse IV, May 31 2026
MAPLE
seq(add(floor((k/2)^2)*n^2, k = 0..n), n = 0..36);
gf := (9*x^4 + 21*x^3 + 31*x^2 + 15*x + 4)*x^2/((x - 1)^6*(x + 1)^3):
ser := series(gf, x, 40): seq(coeff(ser, x, n), n = 0..36);
MATHEMATICA
LinearRecurrence[{3, 0, -8, 6, 6, -8, 0, 3, -1}, {0, 0, 4, 27, 112, 325, 792, 1666, 3200}, 40] (* Hugo Pfoertner, Jan 10 2026 *)
PROG
(PARI) a(n)=(2*n^5+3*n^4-2*n^3-n%2*3*n^2)/24 \\ Charles R Greathouse IV, May 31 2026
CROSSREFS
KEYWORD
nonn,easy,changed
AUTHOR
Peter Luschny, Jan 10 2026
STATUS
approved
