login
Column 3 of triangle A127082.
10

%I #8 Jan 30 2020 22:03:02

%S 1,4,26,192,1551,13416,122770,1180496,11883079,124992672,1372811900,

%T 15741602608,188470662702,2356327731016,30760057620142,

%U 419124712458444,5956905826561685,88230307480324360,1360309585677285312

%N Column 3 of triangle A127082.

%C Convolution 4th power of A127089.

%H G. C. Greubel, <a href="/A127086/b127086.txt">Table of n, a(n) for n = 3..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, 3], {n,3,25}] (* _G. C. Greubel_, Jan 30 2020 *)

%Y Cf. A127082.

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

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

%K nonn

%O 3,2

%A _Paul D. Hanna_, Jan 04 2007