login
Expansion of 1/(1-8x*c(9x)), where c(x) is the g.f. of A000108.
2

%I #10 May 17 2019 02:36:14

%S 1,8,136,2960,73000,1941488,54308944,1575042848,46933604200,

%T 1428339725360,44208223638256,1387283904693728,44037051952177936,

%U 1411537432519587680,45622957237070603680,1485278571381185936960

%N Expansion of 1/(1-8x*c(9x)), where c(x) is the g.f. of A000108.

%F a(n) = Sum_{k=0..n} A039599(n,k)*(-1)^k*9^(n-k). - _Philippe Deléham_, Dec 11 2007

%p c:=proc(x) options operator, arrow: (1/2-(1/2)*sqrt(1-4*x))/x end proc: G:=1/(1-8*x*c(9*x)): Gser:=series(G,x=0,20): seq(coeff(Gser,x,n),n=0..16); # _Emeric Deutsch_, Dec 20 2007

%Y Cf. A000108, A039599.

%K nonn

%O 0,2

%A _Philippe Deléham_, Nov 18 2007

%E More terms from _Emeric Deutsch_, Dec 20 2007