|
%I #19 Jun 25 2022 07:36:13
%S 1,1,0,-2,4,10,-150,838,222,-82616,1408364,-13862308,-18747672,
%T 5307622274,-170657860276,3561218897884,-33756455501714,
%U -1481233045213718,116803294574962288,-5108843717328225572,157037998518149186728,-1976107915155933805542
%N E.g.f. A(x) satisfies A'(x) = 1 + A(1 - exp(-x)).
%H Seiichi Manyama, <a href="/A355203/b355203.txt">Table of n, a(n) for n = 1..332</a>
%F a(1) = 1; a(n+1) = Sum_{k=1..n} (-1)^(n-k) * Stirling2(n,k) * a(k).
%o (PARI) a_vector(n) = my(v=vector(n)); v[1]=1; for(i=1, n-1, v[i+1]=sum(j=1, i, (-1)^(i-j)*stirling(i, j, 2)*v[j])); v;
%Y Cf. A003659, A143805, A307874.
%Y Cf. A355207, A355211, A355217.
%K sign
%O 1,4
%A _Seiichi Manyama_, Jun 24 2022
|
