OFFSET
0,7
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..140
FORMULA
a(n) = A381529(n,n).
MAPLE
b:= proc(o, u, t, k) option remember; `if`(u+o=0, `if`(k=0,
max(0, t-1)!, 0), `if`(t>0, b(u+o, 0$2, k)*(t-1)!, 0)+
add(`if`(k+1<u+j, 0, b(o-j, u+j-1, t+1, k-(u+j-1))),
j=`if`(t=0, 1, 1..o)))
end:
a:= n-> b(n, 0$2, n):
seq(a(n), n=0..30);
CROSSREFS
KEYWORD
nonn
AUTHOR
Alois P. Heinz, Feb 26 2025
STATUS
approved
