cp's OEIS Frontend

A159607 G.f. satisfies: A(x) = 1 + x*d/dx log(1 + x*A(x)^2).

%I A159607 #5 Feb 22 2014 06:16:20
%S A159607 1,1,3,16,123,1221,14724,207908,3355803,60873595,1225319163,
%T A159607 27097430328,653052022740,17036213760892,478306368143880,
%U A159607 14381009543824236,461038595072589531,15699544671941958663,565927686301436324649
%N A159607 G.f. satisfies: A(x) = 1 + x*d/dx log(1 + x*A(x)^2).
%H A159607 Vaclav Kotesovec, <a href="/A159607/b159607.txt">Table of n, a(n) for n = 0..400</a>
%F A159607 G.f. satisfies: A(x) = 1 + x*A(x)^2*(2 - A(x)) + 2*x^2*A'(x)*A(x).
%F A159607 a(n) ~ c * n! * 2^n, where c = 0.343014753433948245763329120820010283... - _Vaclav Kotesovec_, Feb 22 2014
%e A159607 G.f.: A(x) = 1 + x + 3*x^2 + 16*x^3 + 123*x^4 + 1221*x^5 +...
%e A159607 A(x)^2 = 1 + 2*x + 7*x^2 + 38*x^3 + 287*x^4 + 2784*x^5 +...
%e A159607 log(1+x*A(x)^2) = x + 3*x^2/2 + 16*x^3/3 + 123*x^4/4 + 1221*x^5/5 +...
%o A159607 (PARI) {a(n)=local(A=1+x);for(i=1,n,A=1+x*deriv(log(1+x*Ser(A)^2)+x*O(x^n)));polcoeff(A,n)}
%Y A159607 Cf. variants: A159606, A159608.
%K A159607 nonn
%O A159607 0,3
%A A159607 _Paul D. Hanna_, May 16 2009