OFFSET
0,2
FORMULA
a(n) = [x^n] (20*x^2 - 6*x + 1) / (1 - 4*x)^(5/2).
a(n) = a(n-1)*(-2 + 4*n - 2*n^2 + 4*n^3) / (2*n - 2*n^2 + n^3) for n > 0.
MAPLE
aList := proc(len) local gf, ser;
gf := (20*x^2 - 6*x + 1) / (1 - 4*x)^(5/2): ser := series(gf, x, len+2):
seq(coeff(ser, x, n), n = 0..len) end: aList(23);
MATHEMATICA
Table[4^n Binomial[n-1/2, -1/2](n^2+1), {n, 0, 30}] (* Harvey P. Dale, Jun 20 2021 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Peter Luschny, May 17 2021
STATUS
approved