%I A093113
%S A093113 1,2,6,16,62,192,652,2048,9270,31744,116948,393216,1533868,5341184,
%T A093113 19445016,67108864,332958758,1215037440,4711687300,16642998272,
%U A093113 67697833092,245257732096,923984441000,3298534883328,13952454631996
%N A093113 Coefficients of the solution to a functional equation.
%C A093113 G.f. A(x) satisfies A(4x^2)=A(x)+A(-x)=-4A(x)A(-x). Also A(4x^2)=4A(x)^2/
               (1+4A(x)).
%o A093113 (PARI) a(n)=local(A,m); if(n<1,0,A=x+O(x^2); m=1; while(m<=n,m*=2; A=subst(A,
               x,x^2); A=A/2+sqrt(A^2/4+A)); polcoeff(A,n)*4^(n-1))
%Y A093113 Sequence in context: A131385 A027742 A033301 this_sequence A150030 A150031 
               A121753
%Y A093113 Adjacent sequences: A093110 A093111 A093112 this_sequence A093114 A093115 
               A093116
%K A093113 nonn
%O A093113 1,2
%A A093113 Michael Somos, Mar 20 2004