|
%I #5 Mar 30 2012 18:58:05
%S 1,3,20,412,29080,7344960,6790976640,23310543674880,
%T 300020122552550400,14587151144134593024000,
%U 2695072097623041659787264000,1901191652075515716657381408768000,5141119908014521906432306538772430848000
%N (n-1)-st elementary symmetric function of the first n terms of (1,2,6,20,70,252,...)=A000984.
%t f[k_] := Binomial[2 k - 2, k - 1];
%t t[n_] := Table[f[k], {k, 1, n}]
%t a[n_] := SymmetricPolynomial[n - 1, t[n]]
%t Table[a[n], {n, 1, 14}] (* A203194 *)
%Y Cf. A000984.
%K nonn
%O 1,2
%A _Clark Kimberling_, Dec 30 2011
|
