OFFSET
0,2
COMMENTS
LINKS
Harvey P. Dale, Table of n, a(n) for n = 0..831
Index entries for linear recurrences with constant coefficients, signature (15,15,15,-120).
FORMULA
G.f.: (t^4 + 2*t^3 + 2*t^2 + 2*t + 1)/(120*t^4 - 15*t^3 - 15*t^2 - 15*t + 1).
MATHEMATICA
CoefficientList[Series[(t^4 + 2 t^3 + 2 t^2 + 2 t + 1)/(120 t^4 - 15 t^3 - 15 t^2 - 15 t + 1), {t, 0, 20}], t] (* Jinyuan Wang, Mar 23 2020 *)
(* Alternative: *)
coxG[{4, 120, -15}] (* The coxG program is at A169452 *) (* Harvey P. Dale, Aug 06 2026 *)
(* Alternative: *)
LinearRecurrence[{15, 15, 15, -120}, {1, 17, 272, 4352, 69496}, 20] (* Harvey P. Dale, Aug 06 2026 *)
PROG
(PARI) a(n)=if(n, ([0, 1, 0, 0; 0, 0, 1, 0; 0, 0, 0, 1; -120, 15, 15, 15]^(n-1)*[17; 272; 4352; 69496])[1, 1], 1) \\ Charles R Greathouse IV, Aug 14 2026
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
John Cannon and N. J. A. Sloane, Dec 03 2009
EXTENSIONS
More terms from Jinyuan Wang, Mar 23 2020
STATUS
approved