OFFSET
9,2
LINKS
Alois P. Heinz, Table of n, a(n) for n = 9..200
EXAMPLE
a(9) = 1: 123456789.
MAPLE
b:= proc(n) option remember; `if`(n<4, n!,
(-147456*(n+4)*(n-1)^2*(n-2)^2*(n-3)^2*b(n-4)
+128*(33876+30709*n+6687*n^2+410*n^3)*(n-1)^2*(n-2)^2*b(n-3)
-4*(1092*n^5+37140*n^4+455667*n^3+2387171*n^2+4649270*n+1206000)*
(n-1)^2*b(n-2) +(-17075520+(22488312+(29223280+(10509820+(1764252+
(154164+(6804+120*n)*n)*n)*n)*n)*n)*n)*b(n-1))/
((n+16)*(n+7)^2*(n+15)^2*(n+12)^2))
end:
a:= n-> n! -b(n):
seq(a(n), n=9..30);
CROSSREFS
KEYWORD
nonn
AUTHOR
Alois P. Heinz, Oct 10 2012
STATUS
approved