OFFSET
0,2
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..2000 (500 terms from R. H. Hardin)
Index entries for linear recurrences with constant coefficients, signature (1,1,1,-1).
FORMULA
G.f.: (x+1)*(x^2+1) / ( 1-x-x^2-x^3+x^4 ). - R. J. Mathar, Nov 28 2011
MATHEMATICA
CoefficientList[Series[(13 + 10*x + 4*x^2 - 8*x^3)/(1 - x - x^2 - x^3 + x^4), {x, 0, 50}], x] (* Wesley Ivan Hurt, Jan 10 2017 *)
LinearRecurrence[{1, 1, 1, -1}, {13, 23, 40, 68}, 50] (* G. C. Greubel, Sep 19 2017 *)
PROG
(PARI) x='x+O('x^50); Vec(x^4*(13+10*x+4*x^2-8*x^3)/(1-x-x^2-x^3+x^4)) \\ G. C. Greubel, Sep 19 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
R. H. Hardin, Aug 14 2009
EXTENSIONS
Edited by Alois P. Heinz, Dec 30 2023
STATUS
approved