|
%I #6 Nov 05 2012 23:34:53
%S 1,1,3,22,317,7976,329167,21511036,2187830521,343670351392,
%T 83118756921371,30891910810811084,17606061819337679173,
%U 15347380239670729742272,20404520526924833144453623,41254672227383167503175726876,126484184787351358506375259745393
%N E.g.f. satisfies: A(x) = Sum_{n>=0} x^n*A(n*x)^n/n!.
%e E.g.f.: A(x) = 1 + x + 3*x^2/2! + 22*x^3/3! + 317*x^4/4! + 7976*x^5/5! +...
%e The e.g.f. satisfies:
%e A(x) = 1 + x*A(x) + x^2*A(2*x)^2/2! + x^3*A(3*x)^3/3! + x^4*A(4*x)^4/4! +...
%o (PARI) {a(n)=local(A=1+x);for(i=1,n,A=1+sum(m=1,n,x^m*subst(A,x,m*x+x*O(x^(n)))^m/m!));n!*polcoeff(A,n)}
%o for(n=0,20,print1(a(n),", "))
%Y Cf. A125281, A155806, A218682.
%K nonn
%O 0,3
%A _Paul D. Hanna_, Jun 21 2011
|
