OFFSET
0,3
COMMENTS
Floor(a(n)/n!) = A085022(n).
EXAMPLE
exp(x*(1 + x + floor(3/2!)*x^2 + floor(13/3!)*x^3 + floor(97/4!)*x^4 + ...)) = 1 + x + (3/2!)*x^2 + (13/3!)*x^3 + (97/4!)*x^4 + ...
PROG
(PARI) {a(n)=local(A); if(n<0, 0, A=1+O(x); for(m=1, n, A=Pol(A)+x^m*(floor(polcoeff(exp(x*A), m))+O(x)); ); n!*polcoeff(exp(x*A), n))}
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul D. Hanna, Jun 18 2003
EXTENSIONS
Example added by Vaclav Kotesovec, Apr 27 2015
STATUS
approved