%I A060356
%S A060356 0,1,0,3,4,65,306,4207,38424,573057,7753510,134046671,2353898196,
%T A060356 47602871329,1013794852266,23751106404495,590663769125296,
%U A060356 15806094859299329,448284980183376078,13515502344669830287
%N A060356 E.g.f.: -LambertW(-x/(1+x)).
%H A060356 Harry J. Smith, <a href="b060356.txt">Table of n, a(n) for n=0,...,100</
               a>
%F A060356 a(n) = Sum_{k=1..n} (-1)^(n-k)*n!/k!*binomial(n-1, k-1)*k^(k-1). a(n) 
               = Sum_{k=0..n} Stirling1(n, k)*A058863(k). - Vladeta Jovovic (vladeta(AT)eunet.rs), 
               Sep 17 2003
%o A060356 (PARI) { for (n=0, 100, f=n!; a=sum(k=1, n, (-1)^(n - k)*f/k!*binomial(n 
               - 1, k - 1)*k^(k - 1)); write("b060356.txt", n, " ", a); ) } [From 
               Harry J. Smith (hjsmithh(AT)sbcglobal.net), Jul 04 2009]
%Y A060356 Cf. A052871, A060313.
%Y A060356 Cf. A008297.
%Y A060356 Sequence in context: A067093 A041105 A079076 this_sequence A052323 A012087 
               A012194
%Y A060356 Adjacent sequences: A060353 A060354 A060355 this_sequence A060357 A060358 
               A060359
%K A060356 easy,nonn
%O A060356 0,4
%A A060356 Vladeta Jovovic (vladeta(AT)eunet.rs), Apr 01 2001