|
%I #7 Mar 30 2012 18:37:26
%S 1,1,1,4,75,7636,4866965,22256484426,827473662052359,
%T 280073424855627741304,956136927041635596586248969,
%U 36146438316110599447497305174316790,16486165931975571004114967909531846539984907
%N G.f.: 1 = Sum_{n>=0} a(n)*exp(-n!*x)*x^n/n!.
%F 1 = Sum_{n>=0} a(n)*x^n/(1 + n!*x)^(n+1).
%F 1 = Sum_{n>=0} a(n)*C(n+m-1,n)*x^n/(1 + n!*x)^(n+m) for m>=1.
%F log(1+x) = Sum_{n>=1} a(n)*x^n/(1 + n!*x)^n/n.
%F a(n) = Sum_{k>=0..n-1} -(-1)^(n-k)*C(n,k)*k!^(n-k)*a(k) for n>0 with a(0)=1.
%e 1 = exp(-x) + exp(-x)*x + exp(-2!*x)*x^2/2! + 4*exp(-3!*x)*x^3/3! + 75*exp(-4!*x)*x^4/4! +...
%e 1 = 1/(1+x) + x/(1+x)^2 + x^2/(1+2!*x)^3 + 4*x^3/(1+3!*x)^4 + 75*x^4/(1+4!*x)^5 +...
%e 1 = 1/(1+x)^2 + 1*2*x/(1+x)^3 + 1*3*x^2/(1+2!*x)^4 + 4*4*x^3/(1+3!*x)^5 + 75*5*x^4/(1+4!*x)^6 +...
%e 1 = 1/(1+x)^3 + 1*3*x/(1+x)^4 + 1*6*x^2/(1+2!*x)^5 + 4*10*x^3/(1+3!*x)^6 + 75*15*x^4/(1+4!*x)^7 +...
%e log(1+x) = x/(1+x) + x^2/(1+2!*x)^2/2 + 4*x^3/(1+3!*x)^3/3 + 75*x^4/(1+4!*x)^4/4 + 7636*x^5/(1+5!*x)^5/5 + 4866965*x^6/(1+6!*x)^6/6 +...
%o (PARI) {a(n)=polcoeff(1-sum(k=0, n-1, a(k)*x^k/(1+k!*x+x*O(x^n))^(k+1)), n)}
%o (PARI) {a(n)=n!*polcoeff(1-sum(k=0, n-1, a(k)*x^k*exp(-k!*x+x*O(x^n))/k!), n)}
%o (PARI) {a(n)=if(n==0, 1, sum(k=0, n-1, -(-1)^(n-k)*binomial(n, k)*k!^(n-k)*a(k)))}
%K nonn
%O 0,4
%A _Paul D. Hanna_, Jun 04 2011
| 