cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A127133 Self-convolution 4th root of column 3 (A127130) of triangle A127126.

This page as a plain text file.
%I A127133 #9 Jan 28 2020 22:29:34
%S A127133 1,1,6,52,576,7591,114365,1923185,35541761,714104502,15475682769,
%T A127133 359547718332,8911727170149,234697278951915,6544781944957233,
%U A127133 192669771715328227,5971713743277322517,194402722591654350978
%N A127133 Self-convolution 4th root of column 3 (A127130) of triangle A127126.
%H A127133 G. C. Greubel, <a href="/A127133/b127133.txt">Table of n, a(n) for n = 0..80</a>
%t A127133 T[n_, k_]:= T[n, k]= If[k==n, 1, Coefficient[(1 +x*Sum[x^(r-k-1)*Sum[T[r, c], {c,k+1,r}], {r,k+1,n}] +x^(n+1))^(k+1), x, n-k]]; CoefficientList[Series[ (Sum[T[n, 3]*x^n, {n,0,25}]/x^3)^(1/4), {x,0,20}], x] (* _G. C. Greubel_, Jan 28 2020 *)
%Y A127133 Cf. A127126, A127127, A127128, A127129, A127130, A127131, A127132, A127134, A127135.
%K A127133 nonn
%O A127133 0,3
%A A127133 _Paul D. Hanna_, Jan 05 2007