A127088 Convolution cube-root of column 2 (A127085) of triangle A127082.

1, 1, 4, 20, 117, 770, 5581, 44023, 375118, 3434312, 33632306, 350894959, 3885892547, 45520247052, 562266198499, 7301972285296, 99436168734138, 1416444089850373, 21059162813775906, 326127491494213657

Offset

0,3

Links

G. C. Greubel, Table of n, a(n) for n = 0..80

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]]; CoefficientList[Series[ (Sum[T[n, 2]*x^n, {n, 0, 25}]/x^2)^(1/3), {x, 0, 20}], x] (* G. C. Greubel, Jan 30 2020 *)

Crossrefs

Cf. A127082, A127083, A127084, A127085, A127086, A127087, A127089, A127090, A127091.

Sequence in context: A158900 A190194 A370530 * A258666 A128236 A091046

Adjacent sequences: A127085 A127086 A127087 * A127089 A127090 A127091

Keyword

nonn

Author

Paul D. Hanna, Jan 04 2007

Status

approved