OFFSET
5,2
LINKS
Alois P. Heinz, Table of n, a(n) for n = 5..1000
FORMULA
a(n) = (2*(2*n-17) *(2*n-19) *(2*n-9) *a(n-1) -(2*n-19) *(6*n^2-75*n+208) *a(n-4) +2*(2*n-17) *(10*n^2-136*n+387) *a(n-5) -(2*n-19) *(6*n^2-75*n+212) *a(n-8) +(32*n^3-704*n^2+4940*n-10850) *a(n-9) -(2*n-17) *(2*n-9) *(n-14) *a(n-10) -(2*n-19) *(n-8) *(2*n-9) *a(n-12) +2*(2*n-9) *(2*n^2-36*n+161) *a(n-13) -(n-10) *(2*n-17) *(2*n-9) *a(n-14)) / ((2*n-17) *(2*n-19) *(n-4)).
MAPLE
b:= proc(x, y, t) option remember; `if`(y<0 or y>x, 0, `if`(x=0, 1,
series(b(x-1, y+1, [2, 2, 4, 5, 6, 2, 4, 2, 10, 2][t])+`if`(t=10,
z, 1)*b(x-1, y-1, [1, 3, 1, 3, 3, 7, 8, 9, 1, 3][t]), z, 2)))
end:
a:= n-> coeff(b(2*n, 0, 1), z, 1):
seq(a(n), n=5..40);
CROSSREFS
KEYWORD
nonn
AUTHOR
Alois P. Heinz, Jun 13 2014
STATUS
approved