OFFSET
0,2
COMMENTS
Row 7 of array A094416, which has more information.
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..250
FORMULA
E.g.f.: 1/(8 - 7*exp(x)).
a(n) ~ n! / (8*(log(8/7))^(n+1)). - Vaclav Kotesovec, Mar 20 2014
a(0) = 1; a(n) = 7*a(n-1) - 8*Sum_{k=1..n-1} (-1)^k * binomial(n-1,k) * a(n-k). - Seiichi Manyama, Nov 17 2023
MATHEMATICA
t=30; Range[0, t]! CoefficientList[Series[1/(8 - 7 Exp[x]), {x, 0, t}], x]
PROG
(Magma) m:=20; R<x>:=LaurentSeriesRing(RationalField(), m); b:=Coefficients(R!(1/(8 - 7*Exp(x)))); [Factorial(n-1)*b[n]: n in [1..m]]; // Bruno Berselli, Mar 17 2014
(PARI) x='x+O('x^66); Vec(serlaplace(1/(8 - 7*exp(x)))) \\ Joerg Arndt, Mar 17 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Mar 17 2014
STATUS
approved