A127083 Column 0 and row sums of triangle A127082.
1, 1, 2, 5, 16, 64, 308, 1728, 11046, 79065, 625049, 5397939, 50476959, 507435548, 5451145709, 62260278817, 752770290544, 9598571168318, 128651201239737, 1807273852520354, 26541004709809462, 406530038758976731
Offset: 0
Keywords
Links
- G. C. Greubel, Table of n, a(n) for n = 0..80
Crossrefs
Programs
-
Mathematica
T[n_, k_]:= T[n, k]= If[k==n, 1, Coefficient[(1 + x*Sum[x^(r-k)*Sum[T[r, c], {c,k,r}], {r,k,n-1}] + x^(n+1))^(k+1), x, n-k]]; Table[T[n, 0], {n,0,25}] (* G. C. Greubel, Jan 30 2020 *)