|
%I #2 Mar 30 2012 17:34:41
%S 1,2,2,3,12,3,4,36,36,4,5,80,180,80,5,6,150,600,600,150,6,7,252,1575,
%T 2800,1575,252,7,8,392,3528,9800,9800,3528,392,8,9,576,7056,28224,
%U 44100,28224,7056,576,9,10,810,12960,70560,158760,158760,70560,12960,810,10
%N Triangle T(n,m)= binomial(n, m)/Beta(m + 1, n - m + 1) read by rows.
%C Beta(x,y) = Gamma(x)*Gamma(y)/Gamma(x+y) is the Beta-function.
%C Row sums are A037965(n+1). The second column is A011379.
%F T(n,m)=T(n,n-m) = (n+1)*( binomial(n,m))^2 = (n+1)*A008459(n).
%e 1;
%e 2, 2;
%e 3, 12, 3;
%e 4, 36, 36, 4;
%e 5, 80, 180, 80, 5;
%e 6, 150, 600, 600, 150, 6;
%e 7, 252, 1575, 2800, 1575, 252, 7;
%e 8, 392, 3528, 9800, 9800, 3528, 392, 8;
%e 9, 576, 7056, 28224, 44100, 28224, 7056, 576, 9;
%e 10, 810, 12960, 70560, 158760, 158760, 70560, 12960, 810, 10;
%e 11, 1100, 22275, 158400, 485100, 698544, 485100, 158400, 22275, 1100, 11;
%t Flatten[Table[Table[Binomial[n, m]/Beta[m + 1, n - m + 1], {m, 0, n}], {n, 0, 10}]]
%Y Cf. A037965
%K nonn,easy,tabl
%O 0,2
%A _Roger L. Bagula_, May 25 2010
%E Edited by the Assoc. Eds. of the OEIS - Jun 27 2010
|
