OFFSET
0,4
FORMULA
E.g.f.: exp((x + x^2)/(x^3 - 1)).
MATHEMATICA
CoefficientList[Series[E^(x*(1 + x)/(x^3 - 1)), {x, 0, 20}], x] * Range[0, 20]! (* Vaclav Kotesovec, Oct 12 2017 *)
PROG
(PARI) N=66; x='x+O('x^N); Vec(serlaplace(exp((x+x^2)/(x^3-1))))
(PARI) N=66; x='x+O('x^N); Vec(serlaplace(prod(m=1, N, exp(x^(3*m))/exp(x^m))))
CROSSREFS
KEYWORD
sign
AUTHOR
Seiichi Manyama, Oct 11 2017
STATUS
approved