login
A346187
a(0) = 1; a(n) = Sum_{k=0..n-1} binomial(n,k)^3 * a(k) * a(n-k-1).
1
1, 1, 9, 279, 20655, 2997405, 753171615, 300907367775, 179603100388215, 152724638158940925, 178223093773584811875, 276909379421415142992975, 558708999223935430219474125, 1433526175506213101913925750425, 4594607165137022427482460137390625, 18114938314838093950739712451059177375
OFFSET
0,3
MATHEMATICA
a[0] = 1; a[n_] := a[n] = Sum[Binomial[n, k]^3 a[k] a[n - k - 1], {k, 0, n - 1}]; Table[a[n], {n, 0, 15}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Jul 09 2021
STATUS
approved