The OEIS is supported by the many generous donors to the OEIS Foundation.
%I #4 Nov 26 2019 20:06:09
%S 1,1,2,8,77,2329,302564,222085736,1123297137786,45315713537365706,
%T 16445319538981321524068,59677257201788875416461684008,
%U 2382127122661172512076372104185900762,1141042791864963721866517729601372480006639394
%N a(0) = 1; a(n) = Sum_{k=1..n} |Stirling1(n,k)| * a(n-k).
%t a[n_] := a[n] = Sum[Abs[StirlingS1[n, k]] a[n - k], {k, 1, n}]; a[0] = 1; Table[a[n], {n, 0, 13}]
%Y Cf. A008275, A086555, A308444, A329967.
%K nonn
%O 0,3
%A _Ilya Gutkovskiy_, Nov 26 2019