(MAGMAMagma) 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
(MAGMAMagma) 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
proposed
approved
editing
proposed
(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
G. C. Greubel, <a href="/A069294/b069294.txt">Table of n, a(n) for n = 2..1001</a>
<a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (12,-34,14,16).
LinearRecurrence[{12, -34, 14, 16}, {12, 110, 926, 7556}, 50] (* 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
approved
editing
editing
approved
(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
approved
editing
<a href="/index/Rec">Index to sequences with entries for linear recurrences with constant coefficients</a>, signature (12,-34,14,16).
<a href="/index/Rea#recLCCRec">Index to sequences with linear recurrences with constant coefficients</a>, signature (12,-34,14,16).
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 (vladeta(AT)eunet.rs), _, Jul 02 2003