login
Column 2 of triangle A127082.
10

%I #6 Jan 30 2020 18:13:49

%S 1,3,15,85,531,3600,26266,205353,1716582,15321056,145819266,

%T 1477589301,15908557455,181553715486,2190398368254,27859946518796,

%U 372542199781464,5223365137285467,76597458027515272,1172078722366916586

%N Column 2 of triangle A127082.

%C Convolution cube of A127088.

%H G. C. Greubel, <a href="/A127085/b127085.txt">Table of n, a(n) for n = 2..80</a>

%t 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, 2], {n,2,25}] (* _G. C. Greubel_, Jan 30 2020 *)

%Y Cf. A127082.

%Y Columns of A127082: A127083, A127084, A127086.

%Y Cf. A127087, A127088, A127089, A127090, A127091.

%K nonn

%O 2,2

%A _Paul D. Hanna_, Jan 04 2007