A086934 E.g.f.: (sqrt(Pi)/2)*erf(log(1-x)).

0, -1, -1, 0, 6, 34, 150, 548, 1064, -9620, -190980, -2379408, -26412408, -281137848, -2923819080, -29496805392, -277842087360, -2151448802448, -5085750338064, 334794720634752, 11987850975483360

Offset: 0

Author

Vladeta Jovovic, Sep 21 2003

Keywords

• sign

Links

• G. C. Greubel, Table of n, a(n) for n = 0..450

Crossrefs

Cf. A009199.

Programs

Mathematica

With[{nn=20},CoefficientList[Series[Sqrt[Pi]/2 Erf[Log[1-x]],{x,0,nn}],x] Range[0,nn]!] (* Harvey P. Dale, Mar 04 2015 *)

Formula

Sum_{k=0..floor((n-1)/2)} (-1)^(n-k)*Stirling1(n, 2*k+1)*(2*k)!/(k)!.

Extensions

Definition clarified by Harvey P. Dale, Mar 04 2015