OFFSET
0,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..400
FORMULA
a(n) = [x^n] 1/((1-9*x) * (1-x)^n).
a(n) = Sum_{k=0..n} 9^k * (-8)^(n-k) * binomial(2*n,k) * binomial(2*n-k-1,n-k).
a(n) = Sum_{k=0..n} 9^k * binomial(2*n-k-1,n-k).
G.f.: (1+sqrt(1-4*x))/( sqrt(1-4*x) * (9*sqrt(1-4*x)-7) ).
MATHEMATICA
Table[Sum[8^k*Binomial[2*n, n-k], {k, 0, n}], {n, 0, 25}] (* Vincenzo Librandi, Aug 13 2025 *)
PROG
(PARI) a(n) = sum(k=0, n, 8^k*binomial(2*n, n-k));
(Magma) [&+[8^k * Binomial(2*n, n-k): k in [0..n]]: n in [0..25]]; // Vincenzo Librandi, Aug 13 2025
CROSSREFS
KEYWORD
nonn
AUTHOR
Seiichi Manyama, Aug 11 2025
STATUS
approved
