cp's OEIS Frontend

A228648 G.f.: exp( Sum_{n>=1} A001609(n^2)*x^n/n ), where the l.g.f. of A001609 is -log(1-x-x^3).

%I A228648 #11 Aug 28 2013 23:32:58
%S A228648 1,1,3,13,128,2974,161048,19632276,5284440413,3112165670205,
%T A228648 3990553641147871,11107142249379896577,66971338268043285905138,
%U A228648 873496931276771661395863398,24617613776054408956962658439353,1497874647146694311608664496205734267,196633628592570082430451891781759097556806
%N A228648 G.f.: exp( Sum_{n>=1} A001609(n^2)*x^n/n ), where the l.g.f. of A001609 is -log(1-x-x^3).
%C A228648 A001609 forms the logarithmic derivative of Narayana's cows sequence A000930.
%F A228648 Logarithmic derivative yields A228647.
%e A228648 G.f.: A(x) = 1 + x + 3*x^2 + 13*x^3 + 128*x^4 + 2974*x^5 + 161048*x^6 +...
%e A228648 where
%e A228648 log(A(x)) = x + 5*x^2/2 + 31*x^3/3 + 453*x^4/4 + 14131*x^5/5 + 946781*x^6/6 + 136250983*x^7/7 +...+ A001609(n^2)*x^n/n +...
%o A228648 (PARI) {A001609(n)=n*polcoeff(-log(1-x-x^3 +x*O(x^n)), n)}
%o A228648 {a(n)=polcoeff(exp(sum(m=1,n+1,A001609(m^2)*x^m/m)+x*O(x^n)),n)}
%o A228648 for(n=0,20,print1(a(n),", "))
%Y A228648 Cf. A228647, A001609, A000930.
%K A228648 nonn
%O A228648 0,3
%A A228648 _Paul D. Hanna_, Aug 28 2013