|
%I #13 Dec 15 2016 23:49:24
%S 1,3,20,492,59328,42750720,215488512000,8688622215168000,
%T 3152932286024908800000,11441362514460661304524800000,
%U 456702585875829909265192058880000000,218761269624450195162273767321763840000000000
%N (n-1)-st elementary symmetric function of (1!,...,(n-1)!).
%F From _Daniel Suteu_, Dec 04 2016: (Start)
%F a(n) ~ (e-1) * A000178(n).
%F a(1) = 1, a(n) = n! * a(n-1) + A000178(n-1). (End)
%t f[k_] := k!; t[n_] := Table[f[k], {k, n}]
%t a[n_] := SymmetricPolynomial[n - 1, t[n]]
%t Table[a[n], {n, 14}] (* A203228 *)
%Y Cf. A000142, A203222.
%K nonn
%O 1,2
%A _Clark Kimberling_, Dec 30 2011
| 