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

1, 7, 105, 2023, 44233, 1043847, 25921833, 667598631, 17669646729, 477706767559, 13136097627625, 366267006096999, 10331118817064521, 294265822473133063, 8452135970510611113, 244534782069771034023, 7119789572700157711113, 208459073966103650720583

Offset: 0

Author

Philippe Deléham, Nov 18 2007

Keywords

• nonn

Crossrefs

Cf. A039599.

Programs

Mathematica

CoefficientList[Series[16/(9+7*Sqrt[1-32*x]), {x, 0, 16}], x] (* Georg Fischer, Apr 08 2020 *)

PARI

seq(n)={Vec(16/(9+7*sqrt(1-32*x + O(x*x^n))))} \\ Andrew Howroyd, Apr 08 2020

Formula

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

G.f.: 16/(9 + 7*sqrt(1-32*x)). - Philippe Deléham, Oct 27 2011

Extensions

More terms from Philippe Deléham, Oct 27 2011

a(9) corrected by Georg Fischer, Apr 08 2020