OFFSET
0,3
MATHEMATICA
Join[{1}, Table[Sum[Binomial[n, j]*CatalanNumber[j]*j^(n-j), {j, 0, n}], {n, 1, 25}]]
PROG
(PARI) a(n) = sum(k=0, n, binomial(n, k)*(binomial(2*k, k)/(k+1))*k^(n-k)); \\ Michel Marcus, Nov 23 2021
CROSSREFS
KEYWORD
nonn
AUTHOR
Vaclav Kotesovec, Nov 23 2021
STATUS
approved