%I #6 Sep 08 2013 13:30:50
%S 1,3,18,117,801,5724,42633,331911,2717874,23620329,220260789,
%T 2228505372,24681015981,300506801715,4017984855786,58675338993069,
%U 928673101727001,15804592586240220,287174716511520033,5538727108037507535
%N a(n) = Sum_{k=0..n} 3^k*A111146(n,k).
%F G.f.: A(x) = 1/(1 - 3/2!*x*Sum(k>=0} (k+2)!*x^k ).
%e A(x) = (1 + 3*x + 18*x^2 + 117*x^3 + 801*x^4 + 5724*x^5 +..)
%e = 1/(1 - 3/2!*x*(2! + 3!*x + 4!*x^2 + 5!*x^3 + 6!*x^4 +..) ).
%o (PARI) {a(n)=local(y=3,x=X+X*O(X^n)); polcoeff(1/(1 - y/(y-1)!*x*sum(k=0,n,(y-1+k)!*x^k)),n,X)}
%Y Cf. A111146, A113326, A113327 (y=2), A113329 (y=4), A113330 (y=5), A113331 (y=6).
%K nonn
%O 0,2
%A _Philippe Deléham_ and _Paul D. Hanna_, Oct 26 2005
|