OFFSET
3,2
COMMENTS
a(n) = A243098(n,3)/2. - Alois P. Heinz, Aug 19 2014
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 3..200
FORMULA
a(n) = (n-1)!/(k-1)!*Sum_{i=0..floor((n-k)/k)} 1/(i!*k^i)*n^(n-(i+1)*k)/(n-(i+1)*k)!, k=3.
a(n) ~ 1/2*exp(1/3)*n^(n-1). - Vaclav Kotesovec, Nov 27 2012
MATHEMATICA
nn = 20; CoefficientList[Series[E^(-1/3*LambertW[-x]^3)/2, {x, 0, nn}], x]* Range[0, nn]! (* Vaclav Kotesovec, Nov 27 2012 *)
PROG
(PARI) x='x+O('x^30); Vec(serlaplace(exp(-lambertw(-x)^3/3)/2 - 1/2)) \\ G. C. Greubel, Feb 19 2018
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Vladeta Jovovic, Apr 10 2001
STATUS
approved