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 (6, -8).
FORMULA
a(n) = 4^(n+5)-47*2^(n+1) for n > 1.
G.f.: (279+2322*x-5736*x^2+704*x^3) / ((1-2*x)*(1-4*x)).
G.f. for the sequence starting at a(2): 8*x^2*(2001-3908*x)/((1-2*x)*(1-4*x)).
MATHEMATICA
CoefficientList[Series[(279 + 2322 x - 5736 x^2 + 704 x^3)/((1 - 2 x) (1 - 4 x)), {x, 0, 40}], x] (* Vincenzo Librandi, Sep 24 2013 *)
PROG
(PARI) {m=19; v=concat([279, 3996, 16008, 64784], vector(m-4)); for(n=5, m, v[n]=6*v[n-1]-8*v[n-2]); v}
(Magma) [279, 3996] cat [4^(n+5)-47*2^(n+1): n in [2..25]]; // Vincenzo Librandi, Sep 24 2013
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Klaus Brockhaus, May 14 2010
STATUS
approved