A085294 Integer ceiling of coefficients of exp(x*A(x)).

1, 1, 2, 4, 8, 16, 35, 81, 190, 458, 1122, 2784, 6983, 17678, 45108, 115892, 299542, 778330, 2031974, 5327304, 14020083, 37024711, 98083557, 260583547, 694130905, 1853484434, 4960318790, 13302462676, 35743133528, 96213085461, 259420983385

Offset

0,3

Links

Table of n, a(n) for n=0..30.

Formula

a(n) = ceiling(A085295(n)/n!) where exp(x*A(x)) = Sum_{n>=0} A085295(n)*x^n/n!.

Prog

(PARI) {a(n)=local(A); if(n<0, 0, A=1+O(x); for(m=1, n, A=Pol(A)+x^m*(ceil(polcoeff(exp(x*A), m))+O(x)); ); polcoeff(A, n))}

Crossrefs

Cf. A085295, A085022.

Sequence in context: A247293 A337716 A126137 * A195327 A266544 A348414

Adjacent sequences: A085291 A085292 A085293 * A085295 A085296 A085297

Keyword

nonn

Author

Paul D. Hanna, Jun 24 2003

Status

approved