OFFSET
0,1
COMMENTS
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (7,-14,8).
FORMULA
a(n) = 128*4^n+4*2^n-1 for n > 0, a(1) = 89.
G.f.: (89-104*x-324*x^2+336*x^3)/((1-x)*(1-2*x)*(1-4*x)).
G.f. for the sequence starting at a(1): x*(519-1570*x+1048*x^2)/((1-x)* (1-2*x)*(1-4*x)).
MATHEMATICA
CoefficientList[Series[(89 - 104 x - 324 x^2 + 336 x^3)/((1 - x) (1 - 2 x) (1 - 4 x)), {x, 0, 40}], x] (* Vincenzo Librandi, Sep 24 2013 *)
LinearRecurrence[{7, -14, 8}, {89, 519, 2063, 8223}, 20] (* Harvey P. Dale, Jun 20 2023 *)
PROG
(PARI) {m=20; v=concat([89, 519, 2063], vector(m-3)); for(n=4, m, v[n]=6*v[n-1]-8*v[n-2]-3); v}
(Magma) [89] cat [128*4^n+4*2^n-1: n in [1..25]]; // Vincenzo Librandi, Sep 24 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Klaus Brockhaus, Apr 22 2010
STATUS
approved