OFFSET
1,5
FORMULA
E.g.f.: exp(x)-exp(x+1/2*x^2)-exp(x+1/3*x^3)+exp(x+1/2*x^2+1/3*x^3+1/6*x^6).
MATHEMATICA
nn=21; Range[0, nn]!CoefficientList[Series[(Exp[x^6/6]-1)Exp[x+x^2/2+x^3/3]+(Exp[x^2/2]-1)(Exp[x^3/3]-1)Exp[x], {x, 0, nn}], x]//Rest (* Geoffrey Critzer, Feb 04 2013 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Vladeta Jovovic, Apr 14 2001
STATUS
approved