OFFSET
6,2
LINKS
Alois P. Heinz, Table of n, a(n) for n = 6..200
FORMULA
a(n) = n^(n-12) * (n-5)*(n-4)*(n-3)*(n-2)*(n-1)*(n^5 + 40*n^4 + 835*n^3 + 10960*n^2 + 87636*n + 332640)/3840. - Vaclav Kotesovec, Sep 06 2014
MAPLE
T:= proc(n, m) option remember; `if`(n<0, 0, `if`(n=m, 1,
`if`(m<1 or m>n, 0, add(binomial(n-1, j-1)*j^(j-2)*
T(n-j, m-1), j=1..n-m+1))))
end:
a:= n-> T(n, 6):
seq(a(n), n=6..30);
MATHEMATICA
Table[n^(n-12) * (n-5)*(n-4)*(n-3)*(n-2)*(n-1)*(n^5 + 40*n^4 + 835*n^3 + 10960*n^2 + 87636*n + 332640)/3840, {n, 6, 25}] (* Vaclav Kotesovec, Sep 06 2014 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Alois P. Heinz, Apr 10 2014
STATUS
approved