OFFSET
3,2
LINKS
Alois P. Heinz, Table of n, a(n) for n = 3..150
FORMULA
a(n) = Sum_{m=1..floor(n/3)} A106239(n,m)*m.
MATHEMATICA
nn=22; t=Sum[n^(n-1)x^n/n!, {n, 1, nn}]; Drop[Range[0, nn]!CoefficientList[ Series[D[Exp[y(Log[1/(1-t)]/2-t/2-t^2/4)], y]/.y->1, {x, 0, nn}], x], 3]
CROSSREFS
KEYWORD
nonn
AUTHOR
Geoffrey Critzer, Nov 04 2012
STATUS
approved