OFFSET
1,2
FORMULA
From Daniel Suteu, Dec 04 2016: (Start)
a(n) ~ (e-1) * A000178(n).
a(1) = 1, a(n) = n! * a(n-1) + A000178(n-1). (End)
MATHEMATICA
f[k_] := k!; t[n_] := Table[f[k], {k, n}]
a[n_] := SymmetricPolynomial[n - 1, t[n]]
Table[a[n], {n, 14}] (* A203228 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Dec 30 2011
STATUS
approved