OFFSET
0,1
COMMENTS
LINKS
Index entries for linear recurrences with constant coefficients, signature (0, 4, 0, -1).
FORMULA
G.f.: (3+3x-3x^2)/(1-4x^2+x^4)
MATHEMATICA
CoefficientList[Series[(3+3x-3x^2)/(1-4x^2+x^4), {x, 0, 30}], x]
Transpose[NestList[Flatten[{Rest[#], 4#[[3]]-First[#]}]&, {3, 3, 9, 12}, 50]][[1]] (* Harvey P. Dale, Mar 26 2011 *)
LinearRecurrence[{0, 4, 0, -1}, {3, 3, 9, 12}, 30] (* T. D. Noe, Mar 26 2011 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Mario Catalani (mario.catalani(AT)unito.it), Apr 26 2003
STATUS
approved