A177846 a(n) = 6*a(n-1)-8*a(n-2) for n > 2; a(0)=837, a(1)=7896, a(2)=32176.
837, 7896, 32176, 129888, 521920, 2092416, 8379136, 33535488, 134179840, 536795136, 2147332096, 8589631488, 34359132160, 137437741056, 549753389056, 2199018405888, 8796083322880, 35184352690176, 140737449558016
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..1000
- Index entries for linear recurrences with constant coefficients, signature (6, -8).
Programs
-
Magma
[837] cat [2*4^(n+5)-37*2^(n+2): n in [1..25]]; // Vincenzo Librandi, Sep 24 2013
-
Mathematica
CoefficientList[Series[(837 + 2874 x - 8504 x^2)/((1 - 2 x) (1 - 4 x)), {x, 0, 40}], x] (* Vincenzo Librandi, Sep 24 2013 *)
-
PARI
{m=19; v=concat([837, 7896, 32176], vector(m-3)); for(n=4, m, v[n]=6*v[n-1]-8*v[n-2]); v}
Formula
a(n) = 2*4^(n+5)-37*2^(n+2) for n > 0.
G.f.: (837+2874*x-8504*x^2) / ((1-2*x)*(1-4*x)).
G.f. for the sequence starting at a(1): 8*x*(987-1900*x) / ((1-2*x)*(1-4*x)).
Comments