OFFSET
2,1
LINKS
G. C. Greubel, Table of n, a(n) for n = 2..1001
Index entries for linear recurrences with constant coefficients, signature (12,-34,14,16).
FORMULA
G.f.: 2*x^2*(6-17*x+7*x^2+8*x^3)/(1-8*x)/(2*x^3+2*x^2-4*x+1). - Vladeta Jovovic, Jul 02 2003
MATHEMATICA
LinearRecurrence[{12, -34, 14, 16}, {12, 110, 926, 7556}, 50] (* G. C. Greubel, Apr 22 2018 *)
PROG
(PARI) a(n)=([0, 1, 0, 0; 0, 0, 1, 0; 0, 0, 0, 1; 16, 14, -34, 12]^(n-2)*[12; 110; 926; 7556])[1, 1] \\ Charles R Greathouse IV, May 10 2016
(PARI) x='x+O('x^30); Vec(2*x^2*(6-17*x+7*x^2+8*x^3)/((1-8*x)*(2*x^3 +2*x^2-4*x+1))) \\ G. C. Greubel, Apr 22 2018
(Magma) I:=[12, 110, 926, 7556]; [n le 4 select I[n] else 12*Self(n-1) - 34*Self(n-2) +14*Self(n-3) + 16*Self(n-4): n in [1..30]]; // G. C. Greubel, Apr 22 2018
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
R. H. Hardin, Mar 14 2002
STATUS
approved