OFFSET
0,2
LINKS
MATHEMATICA
CoefficientList[Series[(1-x)/(1+x-x^2-2x^3), {x, 0, 60}], x] (* or *) LinearRecurrence[{-1, 1, 2}, {1, -2, 3}, 60] (* Harvey P. Dale, Dec 03 2018 *)
CROSSREFS
KEYWORD
sign,easy
AUTHOR
N. J. A. Sloane, Nov 17 2002
STATUS
approved