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) = 6*(32*4^n-5*2^n) for n > 0, a(1) = 83.
G.f.: (83+210*x-632*x^2)/((1-2*x)*(1-4*x)).
G.f. for the sequence starting at a(1): 12*x*(59-108*x)/((1-2*x)*(1-4*x)).
MATHEMATICA
CoefficientList[Series[(83 + 210 x - 632 x^2)/((1 - 2 x) (1 - 4 x)), {x, 0, 40}], x] (* Vincenzo Librandi, Sep 24 2013 *)
LinearRecurrence[{6, -8}, {83, 708, 2952}, 30] (* Harvey P. Dale, Apr 08 2019 *)
PROG
(PARI) {m=20; v=concat([83, 708, 2952], vector(m-3)); for(n=4, m, v[n]=6*v[n-1]-8*v[n-2]); v}
(Magma) [83] cat [6*(32*4^n-5*2^n): n in [1..25]]; // Vincenzo Librandi, Sep 24 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Klaus Brockhaus, Apr 22 2010
STATUS
approved