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

1, 8, 136, 2960, 73000, 1941488, 54308944, 1575042848, 46933604200, 1428339725360, 44208223638256, 1387283904693728, 44037051952177936, 1411537432519587680, 45622957237070603680, 1485278571381185936960

Offset: 0

Author

Philippe Deléham, Nov 18 2007

Keywords

• nonn

Crossrefs

Cf. A000108, A039599.

Programs

Maple

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

Formula

a(n) = Sum_{k=0..n} A039599(n,k)*(-1)^k*9^(n-k). - Philippe Deléham, Dec 11 2007

Extensions

More terms from Emeric Deutsch, Dec 20 2007