%I #6 Mar 30 2012 18:57:38
%S 1,1,6,1,28,70,1,66,495,924,1,120,1820,8008,12870,1,190,4845,38760,
%T 125970,184756,1,276,10626,134596,735471,1961256,2704156,1,378,20475,
%U 376740,3108105,13123110,30421755,40116600,1,496,35960,906192,10518300
%N Triangle: T(n,k)=C(4n,2k), 0<=k<=n.
%F T(n,k)=C(4n,2k), 0<=k<=n.
%e First 5 rows of A193633:
%e 1
%e 1...6
%e 1...28....70
%e 1...66....495....924
%e 1...120...1820...8008...12870
%t p[n_, k_] := Binomial[4 n, 2 k];
%t TableForm[Table[p[n, k], {n, 0, 8}, {k, 0, n}]]
%t Flatten[%]
%Y Cf. A193632.
%K nonn,tabl
%O 0,3
%A _Clark Kimberling_, Aug 01 2011
|