OFFSET
0,3
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..1000
MAPLE
b:= proc(n, i, t) option remember;
`if`(t=1, 1/n!, add(b(n-j, j, t-1)/j!, j=i..n/t))
end:
a:= n-> n!*b(n, 0, 6):
seq(a(n), n=0..30);
CROSSREFS
KEYWORD
nonn
AUTHOR
Alois P. Heinz, Jun 21 2013
STATUS
approved